REVISTA PARA USUARIOS DE LA NORMA 


Encienda 
una computadora 

Talent/® 

y sus perifericos. 


MODEM 

• Interfaz asincronica incorporada. 

• Normas BELL y CCITT. 300 y 
1.200 baudiojs. 

• Incluye en 80 Kb software 
de comunicaciones. 

MSX-PLAN 
y MSX-WRITE 



RS-232 

• Velocidades programables desde 
50 a 19.200 baud kds 

• Procesamiento de 
comunicaciones 
desde Basic. 

• Buffer de 128 
caracteres 
para 

recepcion 



UNIDAD DE DISCOS FLEXIBLES 

• 5 1/4’* de 360 Kb (OS-DD) 

• Velocidad transference 
250 Kb/sg. 

• Formato grabacion 
compatible 
MS-DOS. 



TECLADO NUMERICO 



• Conexion a Joystick 

• Se integra a todo el 
software que corre 
bajo MSX-DOS 
(Ej.: D-Basell. 
MSX-Plan, etc.) 


MONITOR 

MONOCROMAT1C0 12” 

• Anti-reflejo - Fdsforo verde. 

• Apto para uso profesional. 

• (80 caracteres x 25 lineas). 

• Parian te con amplificador 
incorporado. 


Softwa re 

MSX-IOGO 

Desarrollado por Logo 
Computer System Inc. con 
aplication de primitives y 
redaction del Manual por 
los Ings. HHario Fernandez 
Long y Ho rack) Reggini, 



MOUSE 

• Codigo DPM-220. 
accesorio para graficar. 




EXPANSION 80 COLUMNAS 

• Hace posible la utilization de 
software estandar CP/M. 
emulando terminal tipo VT-52. 

• Intiuye software para 
maneio de video 


MINI-LAN 



DJSKETTERAS 
2 k 360 KB 


EQUIPO ALUM NO 


(RED PARA USO EDUCACIONAL) 

• Comunicacion por linea compartida 
a 30.000 baud ios 

• Comparte unidades de disco 

e impresoras de console MSX maestro 
con hasta 10 consolas MSX alumno 

• Carga simultanea de un programa a 
todos los alumnos. 

• Carga individual de maestro a alumno 

• Salvado de programa alumno a unidad 
de disco maestro. 

• Salida a impresora de maestro del 
listado de programa alumno. en 
spooling. 

• Funciona desde MSX- Basic. 
MSX-Logo o cualquier programa que 
corra desde Basic. 

• Estando active, se dispone de todo el 

MSX-Basic. 


MSX-LPC 

MSX-PLAN 

MSX-WRITE ^ 

Lenguaje de 

Planilla de calculo 

Procesador de 

programacion 

de Microsoft Corp. 

palabra de ASCII 

estructurado y 

(Version para MSX 

Corp. en casteHano. 

en Castellano. 

-del MUItiplan.) 




l'V 


♦ 


i I HI 


Tecnotogta y lalento^^ 

Produtidt San Luis por Teltmitica S. A. Ncantialarit extiutiva do Microsoft Corp. y ASCII Corp. pan uso dt la norma MSX en Argentina. 

6 fTMMt dt garantia y manauaknant* on au quiosco la ravista Load MSX. 
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MUSICAYS0NID0 
CON LA MSX 


Una de las ambiciones de 
los programadores aficio- 
nados es colocarle musica 
o “cortinas musicalcs” a 



sus trabajos. Asi lo de- 
mucstra la cantidad de car r 
tas que recibimos pregun- 
tando por el tcma. Vamos 
a iraiar de poner un poco de 
luz sobre esta cuestion. 
(Pag. 6) 


RINCON DEL 
USUARI0 


Si bien todos conocemos el 
tradicional “Space inva- 
ders”, esta version simpli- 
ficada -aunque dificil- tie- 



ne su originalidad. Es pro- 
ducto de los conocimientos 
adquiridos por los usuarios 
del Centro de Asistencia de 
Flores. (Pag. 20) 


LOS UTILITARIOS 
DEL XENIX PARA 
MSX-D0S Y ALGO 
MAS... 


Si somos parte del grupo de 
los afortunados que tienen 
acceso a uno de los equipos 
denominados “tipo 386” o 
“multitasking” que corren 



F1GURA 1 


Lisudo Piograma Principal 

CHR$ I 34) 


240 KEY 8, "files" + 

100 REM 

CHRS (13) 

110 REM * • 

250 KEY 9, "key off" 

120 REM » AUTOEXEC . BAS « 

260 KEY 10, "LOAD" + CHRS 

130 REM • * 

(34) ♦ "RESET" ♦ CHRS 

140 REM • • 

(13) ♦ "run" ♦ CHRS (13) 

150 REM •»•»»••»»•«•«••• 

270 WIDTH 40 

160 REM 

280 COLOR 1,3 

170 REM Poc Gustavo 

290 FILES 

Oelfino 

300 LET ED-DSKF(O) 

180 REM D E l T A 1 t r 0 

310 PRINT: PRINT ED* 

n 

1024; "bytes disponi- 

190 REM 

bles ED; "kbytes" 

200 KEY 3, “width » 

320 LET KS-1NKEYS 

210 KEY 5, “run • 

330 IF KS-"" THEN 320 

220 KEY 6. "color 1, 3,3“ + 

340 CLS 

CHRSC13) 

350 KEY ON 

230 KEY 7, “load - ♦ 

360 NEW 



programa favorito. En esta 
nota vemos como lo Iogra- 
mos. (Pag. 30) 



el sistema operativo Unix o 
Xenix, habremos notado la 
extensa biblioteca de pro- 
gramas utilitarios que exis- 
te para este sistema operati- 
vo, suspirando por su au- 
sencia en el entorno MSX- 
DOS. Ahora les explica- 
mos porque no debemos 
suspirar mas. (Pag 26) 


EJECUCI0N 

AUTOMATICA 


Cuando encendemos la 
computadora podemos ha- 
cer que se ejecute nuestro 


PROGRAMA 


Astronomfa (Pag. 10) 


SECCIONES FIJAS 


Noticias MSX (Pag. 4) - 
Soft al dfa (Pag. 32) - Bu- 
zon (Pag. 34) 





El joystick 
electronico 

La empresa Electronics Research Inc. 
acaba de presentar en cardcter de pri- 
micia absoluta el primer joystick to- 
talmente electrdnico. 

La primera vez que uno ve el Warp I 
se sorprende; no se parece en nada al 
resto de los joysticks conocidos. Es 
bdsicamente una esfera alargada ( di- 
gamos con forma de huevo ), que tie- 
ne uno de sus extremos trunco. Alii se 
encuentran, dispuestos como corona 
circular, los 4 contactos metdlicos que 
permiten lograr las ocho direcciones 
convencionales 

A un costado de la esfera estd el con- 
tacto de disparo y en la parte inferior 
(opuesta a la punta truncada ) se halla 
el contacto comun. 

Finalmente, el cable de conexidn a la 
computadora completa la primera vi- 
sidn del conjunto. 

El Warp I prescinde de piezas mecd- 
nicas y de cualquier tipo de pulsador. 
En 61 nada se mueve ni se oprime, 
simplemente se roza suavemente con 
eldedo. 

Para poder detectar en qu6 direccidn 
el usuario desea moverse, los disefia- 
dores han aprovechado las caracteris- 
ticas conductivas del cuerpo humano. 
De esta manera, mientras se tiene el 
joystick en la mano, el contacto co- 
mun apoya sobre la piel y en el mo- 
mento en que se toque otro contacto 
(correspondiente a una direction o al 
disparo, por ejemplo) el circuito se 
cierra y el joystick detecta qu6 placa 
se ha tocado. Asi, la inform acidn via- 
ja en forma instantdnea hacia la com- 
putadora. 

En el interior del Warp se encuentra u- 
na unica plaqueta con algunos chips y 
otros componentes, pero ningunapie- 
za mdvil. El conjunto se halla aislado, 
para preservarlo de la accidn de agen- 
tes extemos (como la humedad, etce- 
tera). 

El producto ha sido diseflado en el pa- 
is con la colaboracidn de t6cnicos es- 


tadounidenses y se produce local- 
mente con componentes de reconoci- 
da calidad. 

La confianza que los fabricantes han 
puesto en el diseflo y en la nobleza de 
las materias primas les permite otor- 
gar a su producto una garantia de 18 
meses. 

El Warp no necesita de los bruscos y 
tensionantes movimientos de palanca 
que se realizan habitualmente con los 
joysticks mecdnicos. 

En lugar deeso.se puede mirar la pan- 
talla y dejar deslizar los dedos pew las 
placas de contacto para obtener resul- 
tados, scores y aviones derribados co- 
mo nunca antes. 

En la superficie de los contactos me- 
tilicos, un pequeflo relieve permite u- 
bicar el dedo correctamente, sin des- 
viar la atenci6n de la pantalla. 

El Warp I cabe f&ilmente en la mano 
de un niflo , asi como en la de un adul- 
to, aunque para su manejo se utilizan 
las dos manos -una donde apoya el 
joystick y la otra que roza los contac- 
tos-, se descuenta que algun usuario 
hdbil pueda llegar a controlarlo con u- 
na sola . 

Se destaca la cuidadosa termination y 
presen taciOn del producto, que refle- 
ja la seriedad con que la gente de Elec- 
tronic Research ha encarado este pro- 
yecto. 

Si bien el costo es algo superior al de 
otros joysticks, las ventajosas carac- 


teristicas otorgadas por su alma elec- 
trdnica en cuanto a velocidad de res- 
puesta y durabilidad lo hacen alta- 
mente conveniente. 

Pascal y Turbo 
Pascal 

Este libro para usuarios de computa- 
doras MSX, Commodore 64-128 y 
PC nos ayudari a introducimos en la 
programacidn prdctica con PASCAL, 
utilizando en todos los ejemplos las 
facilidades y las caracteristicas que 
posee el TURBO PASCAL. 

Puede ser comprendido por aquellos 
lectores sin conocimiento previo de 
computadoras y programaciOn, aun- 
que resultard m£s sencillo si el lector 
tiene unas ideas fundamentales de 
informdtica. 

El texto pone 6nfasis en las ideas 
bdsicas de la programacidn con PAS- 
CAL, sin cargar las p&ginas de con- 
ceptos que pudieran estar relaciona- 
dos con lo que llamariamos "progra- 
macidn avanzada y t6cnicas especia- 
les". 

Al final de cada capitulo se han inclui- 
do ejemplos y problemas resueltos 
que servirdn para ilustrar y aclarar los 
conocimientos vistos en la parte tedri- 
ca. (Edita: Paraninfo. Distribuye: 
Cuspide.) 




Sin duda Chance ya ha sido consagrado como el juego mas popuia. 
en todo el pals. 

Pero, detras de todo gran exito hay una muy buena razon. Por eso detras 
' de Chance, usted siempre encontrara a El Cromsta Comercial. 

Un exito editorial que se escribe con la mas completa informacion. 

Desarrollada a traves de un lenguaje daro y abierto. 

Y con la perspective economica necesaria para comprender me|or 
la actualidad. 

Hoy, quienes juegan con Chance, saben que la mejor informacion 
no es juego. 

El Cronista Comercial 

Su chance de asociarse al exito. 





MUSICA Y SONIDO CON LA MSX 

Una de las ambiciones de los programadores aficionados es colocarles musica o 
“cortinas musicales" a sus trabajos. Asf lo demuestra la cantidad de cartas que red - 
bimos preguntando por el tema. Vamos a tratar de poner un poco de luz sobre esta 

cuestion. 



Figura 1 


P ara ejecutar musica, la nor- 
ma MSX posee un macro 
lenguaje musical que se 
implementa con el comando PLAY 
(similar a lo que hace el DRAW con el 
lenguaje gr&fico). 

Este lenguaje trabaja con strings o ca- 
denas alfanumdricas que deben estar 
encerradas entre comillas. 

UNA ESCALA 
MUSICAL 

En estas cadenas alfanum&icas se de- 
ben ingresar las distintas notas que 
queramos ejecutar. La notation utili- 
zada es la sajona o alfabetica, en don- 
de cada nota es represen tada por una 
letra. La tabla de equivalencia es la si- 
guiente: 

C = DO 
D = RE 
E = MI 
F = FA 
G = SOL 
A = LA 
B = SI 

De esta manera, si queremos ejecutar 
una escala musical completa, sin se- 
mitonos, debemos colocar: 

PLAY “CDEFGAB” 

Los sostenidos y bemoles se indican 
cot + y respectivamente. 

Dentro del PLAY podemos colocar, 
ademis de las notas, una serie de sub- 
comandos que hacen mds rico el es- 
pectro sonoro de nuestra computado- 
ra. 

On establece la octava para las notas 
siguientes a la instruccidn. Hay ocho 
octavas, numeradas de 1 a 8. Si no se 


aclara, la computadora asume que se 
debe ejecutar la cuarta octava. 

Nn ejecuta la nota n, que puede variar 
entre 0 y 96 (0 significa silencio). Es- 
ta es una forma altemativa para selec- 
cionar las notas. 

Ln establece la duration de las notas 
siguientes a la instruction. La dura- 
cidn establecida de la nota es 1/n. n 
puede tomar valores de 1 a 64. Por e- 


jemplo, LI es una nota entera (redon- 
da), L2 una blanca, L4 una negra, L8 
una corchea, etcetera. La duracion 
tambicn puede ir a continuation de la 
nota cuando se desee cambiar sdlo la 
duracidn de la misma. Por ejemplo, 
C8 es equivalente a L8C. Si no se co- 
loca la duracion, la computadora asu- 
me el valor 4. 

Rn indica una pausa o silencio. n pue- 


de variar desde 1 a 64 y determina la 
longitud de la misma. A1 igual que en 
L, 4 es el valor supuesto si no se colo- 
ca n. 

Colocando (.) despuds de una nota, se 
logra que la misma sea ejecutada co- 
mo una con puntillo. Esto significa 
que su longitud seri multiplicada por 
3/2. Puede aparecer mis de un punto 


nemos un panorama bastante amplio 
de lo que significa programar musica 
con la MSX, pero vamos a ir mis alii 
para que nos entiendan aquellos que 
no saben nada de octavas, envolven- 
tes y tempos. 

Una octava consta exactamente de 
siete tonos enteros (las notas) y cinco 
semitonos. ^Qud es lo que sucede? 


Muy ficil; los semitonos “E+” y “B+” 
coinciden con F y C respectivamente. 
Por lo tanto para ejecutar una escala 
completa’debemos colocar: 

PLAY “CC+DD+EFF+GG+AA+B” 
Como no aclaramos en qud octava es- 
tamos trabajando la computadora su- 
pone quees la octava 4. Cambiemos la 
lfnea anterior por 


despuds de la nota y la dura- 
ci6n seri ejecutada de acuer- 
do a dstos. 

Tn marca el tempo. Establece 
el numero de cuartos de nota 
en un minuto. n puede variar 
desde 32 a 255 y 120 es el va- 
lor supuesto si no se coloca 
Tn. 

Vn regulael volumen de sali- 
da de audio, n varia de 0 a 15. 
8 es el valor por defecto. 

Mn establece los perfodos de 
laenvolvente. Varia desde 1 a 
65535. 255 es el valor su- 
puesto si no se coloca Mn. 
Sn establece la forma de la 
envolvente. Puede adoptar 
valores entre 1 y 1 5. 1 es el va- 
lor supuesto si no se coloca 
Sn. 

En general no es necesario se- 
parar los di versos subcoman- 
doscontenidosenPLAY me- 
diante coma o punto y coma. 


MUSICA A 
TRES VOCES 

S i se desea que suenen dos se- 
cuencias de notas paralela- 
mente, se deberi separarlas 
mediante coma en forma de 
dos strings independientes. 
Por ejemplo con 
PLAY “ABC” ”DEF” 
sonarin en forma simul tinea 
las notas A-D, B-E y C-F. De 
la misma manera se pueden 
utilizar los tres canal es para 
hacer tocar las tres notas al 
mismo tiempo. En este caso 
el tercer canal tambiin se se- 
parari de los dos primeros 
mediante coma (PLAY 
“ABC”, “DEF\ “GAB”). 
Con lo visto hasta ahora ya te- 



PRIMER Y UNICO 
CONTROL TOTALMENTE 
ELECTRONICO 
RESPONDE AL TACTO 
CON LA VELOCIDAD DE 
LALUZ. 

NO EXISTE JOYSTICK 
MAS RAPIDO. ‘ 

■ IRROMPIBLE, SIN PARTES 
MECANICAS MOVILES 

• MAXIMIZATU PERFOR- 
MANCE INDIVIDUAL 

• WARP (GOZADE LAMAS 
AMPLIACOBERTURADE 
GARANTIA DEL MERCADO 
DURANTE 18 MESES 

•COMPATIBLE CON 
COMMODORE" 1 ’ 64, 
COMMODORE’ M 128, 
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WARP I ES UN PRODUCTO DE ELECTRONIC 
RESEARCH CORP. S.R.L. 


Podes encontrarlo en Unicenter y Shoping Soleil 


Tel.: 311-4104/8795 313-8197/ 8230 743-7340 




PLAY “05 CC+DD+EFF+GG+A- 
A+B” 

Notaremos que los sonidos de esta es- 
cala son mas agudos. Modifiquemos 
el valor que se encuentra a continua- 
cidn de la O entre 1 y 8 y veamos que 
sucede: 

10 FOR X=1 TO 8 

20 PLAY “0=X; CC + DD + EFF + 

GG + AA + B” 

30 NEXT X 

Este pequeflo programa ejecuta las o- 
cho octavas, una tras otra, desde la 
mds grave a la mas aguda. Aquf nota- 
mos una innovacidn: podemos colo- 
car variables dentro de la cadena alfa- 
numerica. Para ello debemos respetar 
el siguiente formato: 
“Comando=variable;” 

En el macro lenguaje musical tam- 
bien es posible trabajar con numeros 
correspondientes a los diversos soni- 
dos. Es otra forma de notacidn que a 
muchos les resulta mds sencilla. Va 
desde el valor 1 (C en laoctava 1) has- 
ta el 96 (B en la octava 8). Esta nota- 
ci6n dene como ventaja que no se le 
debe indicar a la computadora en qu6 
octava se estd trabajando. Sin embar- 
go, nosotros preferimos la otra, mas 
larga pero mds detallada, por ser ide- 
al para hacer correcciones o modifi- 
caciones. 

Otra variable es la duracion de la no- 
ta. Para manejarla interviene el sub- 
comando L. De acuerdo al valor que 
tome el mismo, serd n, ’e podamos to- 
car una nota corta o larga. Veamos en 
este ejemplo c6mo, mientras se ejecu- 
tan cuatro sonidos por el canal 1, por 
el canal 2 se oye uno solo: 

PLAY “04 L4 CDEF’,”05 LI A” 

SQNIDO Y EFECTQS 
ESPECIALES 

Existen varias posibilidades de crear 
sonido con las MSX. Ya hemos visto 
el comando PLAY. Una segunda ma- 
nera es utilizar el comando BEEP, 
que genera ruidos similares a los que 
se producen cuando la computadora 
nos marca los mensajes de error. 

La tercera forma es el comando 
SOUND. Esta instruccidn nos permi- 
te dirigimos directamente al PSG 



Figura 2 


(Programable Sound Generator). 

El formato del comando SOUND es: 
SOUND numero de registro, expre- 
si6n numerica. 

Existen 16 registros utilizados por el 
PSG, de los cuales 14 pueden emple- 
arse para cargar valores. La funcidn 
de crear sonidos especificos y efectos 
sonoros se puede controlar con dife- 
rentes registros. 

Los registros 0 a 5 controlan el gene- 
rador de tono y programan el periodo 
deseado. 

El registro 6 controla el generador de 
ruido. 

El registro 7 es el control de mezcla. 
Habilita el tono o ruido en el canal co- 
rrespondiente. 

Los registros 8 a 10 seleccionan la 
amplitud fija o con envolvente varia- 
ble. 

Finalmente, los registros 11 a 13 eli- 


gen la forma de la envolvente y pro- 
graman el periodo de la misma. Se 
pueden seleccionar nueve formas de 
envolvente programando el registro 
13 (ver figura 1). 

En la figura 2 podemos ver en forma 
detallada el diagrama de bloques del 
PSG con todos sus registros. 

Los ruidos que se pueden lograr son 
infinitos y es una grata tarea la expe- 
rimentation y el descubrimiento de 
nuevos sonidos. 



SIMULTANEO CON EE.UU. 


SUPLEMENTO BYTE EN K64 










ASTRONOMIA 



Tlpo: Utllitarlo 
Autor: Cdsar N. Fornarl 
Particlpd en el 4to. Concurso de 
Programas 


E xploremos el espacio y a- 
prendamos los fundamentos 
de esta fantistica ciencia. 
Este ulilitario nos brinda una herra- 
mienta para comenzar a querer la as- 
tronomfa. 

Este programa cstd dirigido a los afi- 
cionados a los c&lculos y a la astrono- 
mfa; constade siete aplicaciones rela- 
cionadas con el tenia. 

Las principals son: a) radiacion de u- 
na estrella; b) velocidad espacial y c) 
sistema doble. 

a) Radiacidn de una estrella: Este 
punto calcula la radiacidn de una es- 
trella determinada y ademds su longi- 
tud de onda (Angstrom), temperature 
superficial (grad.K), distancia a que 
se encuentra de nosotros (aflos luz), y 
la energfa que recibimos (ergios). 

b) Velocidad espacial: Calcula la ve- 
locidad espacial de un astro cualquie- 
ra. (Vel. Esp.: es la direccidn en que se 
desplaza un astro en el espacio a una 
velocidad determinada). Este punto 
posee un grdfico explicativo para su 
mejor comprensidn. 

c) Sistema doble: Calcula masa.perf- 
odo o distancia de un sistema doble 
estrella. Masa: de las componentes 
con respecto al sol. Distancia: entre 
componentes. Periodo: con respecto a 
un centro comun (estrellas de masas 
similares) o de una con respecto a la o- 
tra (diferencias pronunciadas de ma- 
sa). 

Como en estas rutinas se maneja mu- 
cho la conversidn de distancias y 
tiempos, las dos ultimas rutinas son 


las encargadas para tal fin. Se tiene la 
posibilidad de ingresar valores en un 
amplio espectro de unidades. 
Finalmente tenemos: Datos planeta- 
rios: Proporciona datos para experi- 
ment con algunas de las rutinas 
principales, o bien para consultarlos 
simplemente por curiosidad. 

Lluvia de estrellas: Ofrece una tabla 
de estrellas fugaces valida todo el afio 
y todos los aflos. 

Variables utilizadas y es- 
tructura del programa 

0100-0210 Listado Principal: S$ = 
Variable alfanumdrica por la cual se- 
lecciona. 

0250-1020 Datos Planetarios: BM = 
Controla position “X” del parpadco 
que seflalala ubicacidn del planeta en 
el sistema solar. Decide tambidn qu6 
datas deben leerse de acuerdo al pla- 
neta. 

Z = Controla el parpadeo. 

AS = Variable alfanumdrica de selec- 


tion para continuar. 

AS...HS = Variable alfanumdrica de 
lectura e impresidn de datas. 
1040-1490 Calc. Radiacidn: P = Para- 
laje. 

AP = Magnitud aparente. 

RK = Radio en kildmetros. 

MF = Magnitud fotogrdfica. 

M = Magnitud absoluta. 

C = Indice de color. 

T = Tempcratura superficial (grad. 
K). 

RC = Radio en centfmetros. 

E = Radiacidn superficial (cm.2-seg.- 
ergios). 

DA = Distancia en aflos luz. 

DC = Distancia en centimetres. 

Al = Area que se forma teniendo co- 
mo radio la distancia tierra-objeto. 
RT = Radiacidn total (seg.-ergios). 
ER = Energfa que recibimos (cm2- 
seg.-ergios). 

LO = Longitud de onda. 

W$ = Variable alfanumdrica de selec- 
ci6n para continuar. 

Z = Contiene valor de la coordenada 





V$ = Variable alfanumdrica de selcc- 
ci6n para continuar. 

1500-1780 Lluvia de esircllas: Y = 
Contiene el valor de la coordenada 

4CY’*’ 

AS...ES = Variable alfanumdrica de 
lcctura e impresion de datas. 

AS = Variable alfanumdrica de sclec- 
ci6n para continuar. 

1820-2190 Vel. espacial: MP = Mo- 
vimiento propio. 

P = Paralaje. 

VR = Velocidad radial. 

VT = Velocidad tangencial. 

X = Variable de valor transitorio para 
el cdlculo de VE. 

VE = Velocidad espacial. 

AS = Variable alfanumdrica de selec- 
ci6n para continuar. 

CL = Corrimiento longitud de onda. 
LO = Longitud de onda normal. 
2200-2620 Sist. doble: DC = Distan- 
cia entre las componentes. 

MC = Masa de las componentes (con 
respecto al sol. Sol =1). 

P = Periodo de las componentes. 

AS = Variable alfanumdrica de selec- 
ci6n para continuar. 

2640-3520 Conv. unidades: VW = 
Variable alfanumdrica que identifica 
de donde proviene el GOSUB y con- 
tinua de acuerdo al valor que V W ten- 
ga. 

SUS = Variable alfanumdrica que 


contiene la unidad en que se trabaja. 
X,A,B,C,D,E ,F = Variables que de a- 
cucrdo a su valor se ejecuta un c&lcu- 
lo u otro en la misma li'nea. 

X: Calcula metros-minutos. 

A: Calcula kildmetros-horas. 

B: Calcula unidades astrondmicas-dl- 
as. 

C: Calcula aflo luz -mes. 

D: Calcula parsec -afios. 

E: Calcula kiloparsec-ddcadas. 

F: Calcula megaparsec-siglos. 

VL: Variable que posee el valor de la 
unidad selecta. 


G,H,UJ,KJ-,M,= Variables que, de 
acuerdo a su valor la computadora sa- 
be con qud unidades trabaja (tiempo- 
longitud) e imprime en consecuencia. 
3530-3570: Subrutina retardo del 
cursor (forma del teletipo). 
3580-3750: Subrutina grdfico expli- 
cativo de Velocidad espacial. 
3760-3770: Subrutina preparado de 
seleccidn (conversion de unidades). 
3780-3880: Prepara la pantalla (tiem- 
po). 

Nota: 2640-2730: Prepara pantalla 
(longitud). 



Talent 

Tecldo DPC 200 A 5.975 

Tec Ido DPC 310 Turbo II A 7.750 

INCLUYE SOFT A ELECCION 

Disk Drive DPF 550 A 6.590 

Monitor MPT 40 A 3.590 

Datassette MSX A 730 

Modem telefonico A 1 .690 

CON GARANTIA OFICIAL TALENT 

TODO EL SOFT, UTILITARIOS Y JUEGOS 

m 



DISKETTES 

BASF A 19 22 

NASHUA A 1922 j 

CIS A 1622/ 


PC XT- AT 

ULTIMA GENERACION 
COMMODORE TODA LA 
LINEA 

TOMANOS MAQUINAS 
EN PARTE DE PAGO 


Av. Rivadavia 2412 - OP- 1034- - 48-6748 


Se. Cre.T. 552-3359 




NOT A: En este listado, algunas Jlneas aparecen conadas. Para quo sc pueda cjccutar correctamente, hay 
que colocar RETURN recien antes de comenzar a tipear otra lfnea (o sea cuando hay otro numero de lfnea). 
Ademas, en las lfneas cortadas hay que ignorar los espacios en bianco que hay entre lfnea y lfnea. 


10 REM 

******************** 

********* 

20 REM ******** 

★ 

30 REM ******* PROGRAMA 
CIE 

NTIFICO ** 

40 REM ******* POR: 
CESAR. N 
. FORNARI * 

50 REM ************* 1 
9 8 

3 ******** 

60 REM 

★**★★★**★★****★★★★★★ 

********* 

70 REM ' 

80 REM ******* LISTADO 
PRIN 

CIPAL **** 

90 REM ' 

100 

CLEAR : COLOR1 5 ,1,1: KEYOF 
F : SCREEN0 : WIDTH38 : CLS : ONERR 
ORGOTOl 790: PRINT" 

./ PR 

OGRAMA CIENTIFICO ./ 
PRINT 

"WWWWWWWWWWWWW 

wwwwwwwwwwwww 

WWWWWWWWWWW" 

110 PRINT : PRINT" l)DATOS 
PLA 

NETARIOS" :PRINT"2) RADIACION 
DE UNA 

ESTRELLA" : PRINT"3 ) L 
LUVIAS DE 
ESTRELLAS" : PRINT" 

4) VELOC.ESPACIAL" :PRINT"5) S 
1ST . DOBLE" : PRINT" 6) CONV . UNI 
D. (LONG . ) " : PRINT" 7 ) CONV . UNI 
D. (TIEMPO) " 

120 

LOCATEO, 22 :PRINT"Selecc 
ione . . " 

130 S$-INKEY$ 

140 IFS$“"1” THEN250 
150 IFS$ 4 ” THEN 1820 
160 IFS$“"5” THEN2200 
170 IFS$=*"6" THEN2640 
180 IFS$="7" THEN3780 
190 IFS$«"2"THEN1040 
200 IFS$“"3" THEN 15 00 

210 GOTO 130 

211 REM ' 

212 REM 

******************* 

********* 

213 REM ** PROG. DATOS 
PLAN 


ETARIOS * 

214 REM 

******************* 

********* 

215 REM ' 

220 REM ' 

221 REM ' 

230 REM *********** MENU 
* * 

******* 

240 REM ' 

241 REM ' 

250 CLS: PRINT"WWWWWW 
WWWWWWWWWWWWW 

wwwwwwwwwwwwww 

WWWWW": PRINT" DA 

TOS 

PLANETAR I OS " : PRINT" WW 
WWWWWWWWWWWWW 
WWWWWWWWWWWWWW 
WWWWWWWWW" 

260 

LOCATEO , 5 : PRI NT " 1 ) MERCU 
RIO", "2) VENUS", "3) TIERRA", " 
4 ) MARTE" , "5 ) JUPITER" , " 6 ) SAT 
URNO" , " 7 ) URANO" , " 8 ) NEPTUNO" 
, "9 ) P LUTON" 

270 

LOCATEO , 22 : INPUT"Planet 
a";A$ 

280 

BM-11 : IFA$*"l M THENGOSUB 
380 : PRINT"MERCURIO" : GOT03 90 
290 

BM=14 : 1 FA $ = " 2 " THENGOS UB 
380 : PRI NT "VENUS" : GOTO 
390 
300 

BM-17 : IFA$«"3"THENGOSUB 
380 :PRINT"TIERRA" :GOTO390 
310 

BM*=20 : IFA$="4 "THENGOSUB 
380 : PRI NT "MARTE" : GOTO390 
320 

BM=24 : IFA$*"5 M THENGOSUB 
380 : PRINT" JUPITER" :GOTO390 
330 

BM=27 : IFA$«"6”THENGOSUB 
380 : PRINT" SATURNO" : GOTO390 
340 

BM-30 : IFA$=*"7 "THENGOSUB 
380 : PRINT"URANO" : GOTO390 
350 

BM=33 : IFA$="8 ,, THENGOSUB 
380 : PRINT"NEPTUNO" : GOTO390 
360 

BM=36 : IFA$“"9 ’’THENGOSUB 
380 :PRINT"PLUTON" :GOTO390 
370 GOTO270 
374 REM ' 


375 REM ' 

376 REM * PREPARA IRA. 
HOJA 

DE DATOS * 

377 REM ' 

380 CLS :PRINT"QQQQQQ 

QQQQQQQQQQQQQQ 

QQQQQQQQQQQQQ 

QQQQQ": RETURN 

390 LOCATE 1 0 f 2 : PRI NT " z 

y 

y < 0 D y y 

z" :PRI 

NT " RRRRRRRRRRRR 

RRRRRRRRRRRRR 

RRRRRRRRRRRRR" 

400 LOCATEO, 6: PRINT"WWW 
WWWWWWWWWWWWWW 

wwwwwwwwwwwww 

WWWWWWWW" 

410 

LOCATEO, 21 : PRI NT "WWW 
WWWWWWWWWWWWW 
WWWWWWWWWWWWWW 
WWWWWWWW" 

420 

LOCATEO, 13 : PRI NT "WWW 
WWWWWWWWWWWWW 
WWWWWWWWWWWWWW 
WWWWWWWW" 

430 Z*0 
440 Z“Z+1 

450 LOCATEBM, 2 : PRINT" O" 
460 LOCATEBM, 2 :PRINT" " 
470 IFZ-110THEN490 
480 GOTO 440 
490 

LOCATEBM, 2 : PRINT"?" : LOC 
ATE0 , 7 : PRINT"Sem . May . 
Dist 

.sol Revolucin Velocid. 
e 

n (media) sid 

rea 

Orbita UA E06- 

Km 

a Km/s 

500 

LOCATEO, 14 :PRINT"Exen 
Inc . Orb . Incl . Ecu . 
Dime 

tro trici sobre 
sob 

re Tierra dad 

eel 

ptic. rbita * 1” 

503 REM ' 

505 REM ' 

506 REM *** LEE DATOS 
IRA. 


HOJA *** 

746 REM ' 

30.058, 4496. 7, 164A 

507 REM ' 

750 LOCATEO, 11 ;PRINT" 

289D, 5. 43, 0.009, 1*46' 21, 28* 

510 IFBM-1 1THENRESTORE84 0 


48 • , 3. 79 

520 IFBM-1 4THENRESTORE850 

" : LOCATEO ,18: PRINT" 

920 DATA 

530 IFBM-1 7THENRESTORE860 


39.757,5946. 6, 250A 

54 0 I FBM-2 OTHENRESTORE 870 

\\ 

255 . 6D, 4 . 73,0.253, 17*8' 2S, 9 

550 IFBM-24THENRESTORE880 

760 

0 ?, 0 . 47 

560 IFBM-2 7THENRESTORE 890 

LOCATE 1,11: PRI NTA$ : LOCA 

930 

570 IFBM-3 OTHENRESTORE 900 

TE1 2 , 1 1 : PRINTB$ : LOCATE22 , 1 1 

READA$,B$,C$,D$,E$,F$,G 

580 IFBM-33THENRESTORE91 0 

: PRINTC$ : LOCATE3 1 ,11: PRINTD 

$,H$: RETURN 

590 IFBM-3 6THENRESTORE 92 0 

$ : LOCATE 1 ,18: PRINTE$ : LOCATE 

940 DATA 

600 GOSUB930 

1 1 , 1 8 : PRINTF$ : LOCATE2 0 , 1 8 : P 

4880,0.056,0.055,5 

605 REM * IMPRIME DATAS 

RINTG$ : LOCATE33 , 18:PRINTH$ 

. 5, 0. 38, 4. 3, 58. 6 5D, 0.06 

1R 

770 GOTO 780 

950 DATA 

A. HOJA * 

775 REM ' 

12100, 0.857, 0.815, 

610 

776 REM * CICLO DE OPCION 

5. 25, 0.903, 10. 36, 243. 0D, 0.7 

LOCATE 1, 11 :PRINTA$:LOCA 

P 

6 

TE10, ll:PRINTB$:LOCATE19, 11 

ARA CONT. * 

960 DATA 

: PRINTC$ : LOCATE31 , 1 1 : PRINTD 

777 REM ' 

12756,1,1,5.517,1, 

$:LOCATEO, 18 :PRINTE$: LOCATE 

780 LOCATEO, 22: PRINT" ** 

11.18, 23H56M4S, 0.39 

7 , 1 8 : PRINTF$ : LOCATE1 9 , 1 8 : PR 

D:MasDat. C:Cont. Z:Menu 

970 DATA 

INTG$ : LOCATE29, 18:PRINTH$ 

★ 

6790,0.150,0.107,3 

620 GOTO 780 

★ " 

. 94 , 0 . 379, 5 . 03, 24H37M23S, 0 . 

625 REM ' 

790 A$-INKEY$ 

16 

62 6 REM * PREPARA PANT. 

800 IFA$-"D"OR 

980 DATA 

2 DA 

A$«"d"THEN63 

143200,1318.7,317. 

. HOJA * 

0 

89, 1.330,2.64, 60.22, 9H50M30 

627 REM ' 

810 IFA$-"C"OR 

S, 0. 73 

630 

A$-"c"THEN25 

990 DATA 

LOCATEO, 7:PRINT"Dimetr 

0 

119300,743.6,95.17 

o Volumen Masa 

820 IFA$-"Z"OR 

,0.706,1.16,36.26, 10H14M,0. 

Dens 

A$— "z"THEN10 

76 

idad en Tierra 

0 

1000 DATA 

T 

830 GOTO 790 

-47100,47.1,14.6,1 

ierra Agua Km 

835 REM ' 

.71,1.11,22.5, 10H49M, 0.93 

- 1 - 1 - 1 " 

837 REM ****** DATAS 

1010 DATA 

640 

****** 

48400,53.7,17.2, 1 

LOCATEO, 14 :PRINT"Intenc 

838 REM ' 

.77,1.21,23.9, 15H48M, 0.84 

odo Ac.de Per 

840 DATA 

1020 DATA 

lbedo Grav. escape 

0.387,57.91,87.97, 

5900,0.10,0.08,4. 

r 

47. 87, 0.206, 7*0' 15, 0*0', 0.3 

5, 0. 43, 4. 2, 6. 3 9D, 0.14 

otacin Tie.-l 

83 

1030 REM ' 

KM/S Sid 

850 DATA 

1031 REM ' 

reo " 

0.723,108.21,224.7 

1032 REM 

645 REM ' 

OD, 35. 02, 0.007, 3*23' 40, 178* 

****************** 

646 REM * LEE DATAS 2DA. 

,0.949 

*★*★**★★★ 

HO 

860 DATA 

1034 REM *** CALCULO DE 

JA * * * 

1,149.6, 1A0 . 006D, 2 

RAD 

647 REM ' 

9. 79, 0. 017, 0*0' 0, 23*27 ',1 

IACION ** 

650 IFBM-11THENRESTORE940 

870 DATA 

1035 REM *** DE UNA 

660 IFBM-1 4THENRESTORE950 

1 . 523, 227 . 9, 1A321 . 

ESTRELL 

670 IFBM-1 7THENRESTORE960 

73D, 24. 13, 0.093, 1*50' 59, 24* 

A ** 

680 I FBM-2 OTHENRESTORE 970 

46’ , 0.53 

1036 REM 

690 I FBM-2 4 THENRESTORE 980 

880 DATA 

****************** 

700 IFBM-27THENRESTORE990 

5.203, 778.3, 11A314 

********* 

710 

.94D, 13. 06, 0.048, 1*18' 16, 3* 

1037 REM ' 

IFBM-3 OTHENRESTORE 1000 

4’, 11. 19 

1038 REM *** ENTRADA DE 

720 

890 DATA 

DAT 

IFBM-3 3THENRESTORE 1 0 1 0 

9.539, 1427, 29A166. 

os ***** 

730 

95D, 9. 65, 0.056, 2*29' 22, 26*4 

1040 GOSUB1340 

IFBM-3 6THENRESTORE 1020 

4 ’ , 9 . 35 

1050 

740 GOSUB930 

900' DATA 

LOCATEO, 19 : INPUT"Paral 

744 REM ' 

19^182,2869.6, 84A4 

aje-seg. (0 calc.)";P 

745 REM ** LIMP IA E IMP. 

D, 6. 80, 0.047, 0*46' 23, 97*53' 

1060 

D 

,3.70 

INPUT"Mag.aparente";AP 

ATA 2DA. HOJA *** 

910 DATA 

1070 INPUT"Radio (Km) RK 



1090 INPUT"Mag . Fot . MF 
1100 IFP=OTHENGOSUB1 4 00 

1105 REM ' 

1106 REM * CALCULO DE 
MAG. 

APARENTE * 

1107 REM ' 

1110 

M=AP+5+(5* ( . 4342944#*L 
OG(P) ) ) 

1114 REM ' 

1116 REM ** CALCULO TEMP. 
S 

UP. (Kx) ** 

1117 REM ' 

1120 C=MF-M 

1130 T=7200/(C+.64) 

1131 REM ** CONVIERTE 
RADIO 

Km EN RADIO Cm **** 

1140 RC=RK*100000! 

1142 REM *** CALCULA RAD. 
S 

UP. *** 

1150 E=5 . 672E-05* (T A 4) 
1153 REM ** CALC. DIST. 

EN 

A%0 LUZ ** 

1160 DA=3 .26/P 
1165 REM ** CALC. RADIA- 
CION 
TOTAL ** 

1170 DC=DA* 9 . 4 6E+ 1 7 
1180 

AI- (DC A 2 ) * (4*3.1415927 

#) 

1190 

RT= (4*3. 1415927#) * (RC A 
2) *E 

1194 REM ** CALC. RAD I AC. 

Q 

' RECIB. ** 

1200 ER=RT/AI 

1205 REM ** CALC. LONGI- 

TUD 

DE ONDA ** 

1210 L0“29000000 ! /T 
1220 GOSUB1340 : GOSUB1350 
1225 REM ** IMP. RESULTA- 
DO 

EN PANT. ** 

1230 

LOCATEO , 3 : PRINT"Rad . Su 
p.":PRINT"/Cm}/Seg/ 

Erg. : " : L 

OCATE1 4 , 4 : PRINTE 

1240 

LOCATEO, 6 :PRINT"Distan 
cia" :PRINT"en 
AL:": LOCATE 14 
, 7 : PRINTDA 
1250 

LOCATEO, 9: PRINT"Rad. To 
tal" : PRINT"/Seg/ 

Erg . : " : LOCA 
TE1 4,10: PRINTRT 


1260 

LOCATEO, 12 :PRINT"Energ 
.Rec. PRINT" /Cm} /Seg/ 
Erg. : 

LOCATE 14, 13: PRINTER 
1270 

LOCATEO, 15 : PRINT "Long . 

Ond. ": PRINT" (Angst . ) : " : LOCA 
TE1 4 ,16: PRINTLO 
1280 

LOCATEO, 18 : PRINT "Temp. 

PRINT" Sup. (Kx) :":LOCATE9, 
1 9 : PRINTT 

1285 REM ' 

1286 REM * CICLO DE 
OPCION 

PARA CONT.* 

1287 REM ' 

1290 LOCATEO, 21: PRINT" 

★ ★ 

* Z : MENU C: Cont . *** 

w 

1300 W$=INKEY$ 

1310 

IFW$="Z"ORW$="z"THEN10 

0 

1320 

IFW$="C"ORW$="c"GOTO10 

40 

1330 GOTO1300 
1335 REM ' 

1337 REM * PREPARA PANTA- 
LLA 

★ ★ ★ it 

1338 REM ' 

1340 CLS : PRINT" 

CA 

LCULO DE RADIACION // 

" : PRIN 

T"lll 111 11 1111111 1111111111 
1111111111111" :RETURN 
1350 Z=2 
1360 Z=Z+3 

1370 LOCATEO, Z: PRINT "WWW 

wwwwwwwwwwwww 

wwwwwwwwwwwwww 

WWWWWWWW" 

1380 IFZ>1 8THENRETURN 
1390 GOTO 1360 
1395 REM ' 

1397 REM +++++ CALC. 

PARA LA 

JE ++++++++ 

1398 REM ' 

1400 

LOCATEO, 4 : PRINT"Calcul 
o P je" : PRINT"WWWWWWW 
WWWW" : PRINT"Di st . en : " : P 
RINT"UA : " : PRINT"AL : " : PRINT" 
PSC : " : PRINT : INPUT"Seleccion 
e:";V$ 

1410 

LOCATEO, 11 : INPUT"INGRE 
SE valor! ! ";Z 
1420 IFV$="UA"THEN1 4 60 
1430 IFV$="AL"THEN14 70 


1440 IFV$="PSC"THEN1 4 80 
1450 GOTO1400 
1460 P=2062 65 !/Z: RETURN 
1470 P-3 . 2 6 /Z : RETURN 
1480 

IFZ>100THENPRINT"MAX! ! 

100 PSC" : GOT014 10 

1490 P=l/Z : RETURN 

1491 REM ' 

1492 REM 

**★****★★★★****★*★ 

****★*★*★ 

1493 REM * LIST. LLUVIA 
DE 

ESTRELLA* 

1494 REM 

★★★★★★★★★★★★★★★★★★ 

1495 REM ' 

1496 REM *** PREPARA 
PANTAL 

* * * * * 

1497 REM ' 

1500 CLS : WIDTH37 : PRINT" 

PR 

INCIPALES LLUVIAS DE 
ESTREL 

LAS" : PRINT "WWWWWWWW 
WWWWWWWWWWWWW 
WWWWWWWWWWWWWW 
W" :PRINT"NOMBRE PUNTO 

FECHA FREC. ASOC. 

RAD . CUMBRE HORA 
CO 

N" * 

1510 PR I NT "WWWWWWWW 
WWWWWWWWWWWWW 

wwwwwwwwwwwwww 

W" 

1515 REM ' 

1516 REM ***** LEE E IMP. 

D 

AT AS **** 

1517 REM ' 

1520 RESTORE1590 
1530 Y=4 
1540 Y=Y+1 

1550 READA$,B$,C$,D$,E$ 
1560 

LOCATE 0 , Y : PRINTA$ : LOCA 
TE1 1 , Y : PRINTB$ : LOCATE 1 9 , Y : P 
RINTC$ : LOCATE 2 6 , Y : PRINTD$ : L 
OCATE31 , Y : PRINTE$ 

1570 IFY>1 9THEN1750 
1580 G0T0154 0 

1584 REM ' 

1585 REM ****** D A T A S 
★ 

★ * ★ * * 

1587 REM ' 

1590 

DATACuadrnt. /Boyero, 0 
3 Ene, 150, ? 

gidas, Coche. , 0 
8 Feb, 012, ? 

ridas, Lira, 21 Ab 


r, 050 , 1861-1 
1620 DATAEta 
Acua. , Acuar . , 0 
5 May, 125, Halley 
1630 DAT AC 
tidas , Balle . , 20 
May, 015, ? 

1640 

DATAEscorp. , Escor . , 10 
Jun, 012, ? 

1650 DATADracn. , Drago. , 28 
Jun, 012, ? 

1660 DATAAcuri. , Acuar . , 29 
Jul , WWW, ? 

1670 

DATADelt . Acu . , Acuar . , 0 
3 Ago, 040, ? 

1680 

DATAPerseidas,Perseo, 1 
0 Ago, 300, 1862-3 
1690 DATAOrinidas, Orin, 19 
Oct, 055, Halley 
1700 DATATuridas, Toro, 13 
N 

ov, 030, Encke 

1710 DATALenidas , Len , 1 7 N 

ov, 060, 1866-1 

1720 DATAAri 

tid. , Aries, 17 

Nov, 012, ? 

1730 

DATAAndromed . , Andr . , 2 
7 Nov, 015, Biela 
nidas , GTAGem 
min . , 1 
2 Die, 050,? 

1744 REM ' 

1745 REM * CICLO DE OP- 
CION 

PARA CONT.* 

1747 REM ' 

1750 LOCATE 0, 21 :PRI NT "WW 
WWWWWWWWWWWWWW 

wwwvwwwwwwwww 

WWWWWWWW" : LOCATE7 , 22 
: PRINT" Z : Menu" 

1760 A$*=INKEY$ 

1770 

IFA$~"Z"ORA$-"z"THEN10 

0 

1780 GOTO1760 

1785 REM ' 

1786 REM * RUTINA M JE . DE 
E 

RROR **** 

1787 REM ' 

1790 

SCREEN0 : LOCATE 1 0 , 10: PR 
INT"E R R 0 
R" : LOCATE 2 , 18 :P 
RINT"Pulse una tecla para 
c 

ontinuar ..." 

1800 A$-INPUT$ (1) 

1810 GOTOIOO 

1811 REM ' 

1812 REM ' 


1813 REM 

****************** 

********* 

1814 REM * CALC. VELOCI- 
DAD 

ESP AC I AL* 

1815 REM 

****************** 

********* 

1816 REM ' 

1817 REM * ENTRADA DE 

DATOS 

***** 

1818 REM ' 

1820 

SCREEN0: LOCATE 0, 0:PRIN 
T" . . CALCULO DE 

VELOC 
IDAD //" 

1830 PRINT : PRINT" 

E S P A C I‘ A L //" 

1840 LOCATEO, 18:A$="Mto 
Pro 

pio X a$o 
(seg) " :GOSUB3530 
1850 INPUT" ";MP 
1860 IF MP=0 THEN1840 
1870 

LOCATEO, 19 : A$=*"Parala j 
e (seg) ":GOSUB3530 
1880 INPUT""; P 
1890 IF P=0 THEN1870 
1900 A$*"Vel . Radial-Km/s 
(0 

para calc. ) " :GOSUB3530 
1910 INPUT" ";VR 
1920 IF VR=0 THENGOSUB 
2060 

1925 REM ' 

1926 REM ** CALC. VELOC. 
ES 

PACIAL ** 

1928 REM ' 

1930 CLS : PRINT" 

CALCU 

LO DE VEL. ESPACIAL //" 
1940 VT* (4.74 *MP) /P 
1950 X«((VR A 2)+(VT A 2) ) 
1960 VE-SQR(X) 

1965 REM ' 

1966 REM * IMP. RESULTA- 
DOS 

Y CICLO DE OPCIONES PARA 
CO 

N»p *********** 

1967 REM ' 

1970 LOCATEO, 11 : PRINT 
"Vel . 

Espacial*" ; VE; "Km/ s" 

1980 LOCATE 
0, 7:PRINT"Vel.T 
ang-";VT;"Km/s" 

1990 LOCATE 
0, 9 : PRINT"Vel . R 
ad . * " ; VR; "Km/ s " 

2000 


LOCATE , , 0 : LOCATE 3, 2 1 : P 
RINT"* C : Cont . Z:Menu 
G: Gra 
fico *" 

2010 A$*=INKEY$ 

2020 IF 

A$="C"ORA$="c"THEN1 

820 

2030 IF 

A$="G"ORA$="g"THENG 

OTO3580 

2040 IF 

A$*"Z"ORA$="z"THENl 

00 

2050 GOTO201 0 

2055 REM ' 

2056 REM ** CALC. VELOC. 
RA 

DIAL *** 

2057 REM ' 

2060 CLS : PRINT" 

Calcu 

lo de Vel. Radial //" 

2070 

LOCATEO, 3 : A$="Corr . Lon 
g . On da" : GOSUB3530 
2080 INPUT""; CL 
2090 A$="Long.Onda 
Norm" : GO 
SUB3530 

2100 INPUT""; LO 
2110 IFCL=0THEN GO- 
.SUB217 0 

2120 IFLO=0THEN GO- 
SUB2170 

2130 VR* (CL/LO) *300000 ! 
2140 FOR F* 1 TO 600 
2150 NEXT F 
2160 RETURN 

2166 REM ** SUBRUT. MJE . 
CA 

LCULO CON CERO **** 

2170 

LOCATE 4, 20: PRINT "CALCU 
LO CON CERO" 

2180 FORT=lTO700 : NEXTT 
2190 RETURN2060 

2192 REM ' 

2193 REM 

★*★****★★★****★*** 

★★****★*★ 

2194 REM ** CALC. SISTE- 
MA D 

OBLE **** 

2195 REM ** CALC. SISTE- 
MA D 

OBLE **** 

2196 REM 

★*★★*******★**★★*★ 
***★*★*★★ ^ 

2197 REM ' 

2198 REM ** ENTRADA DE 
DATO 

S Y COMP ROBAC I ON Q' HAY A 
UN 

A INCOGNITA ********* 

2199 REM 


****************** 

2390 DC=MC*(P A 2) 

2624 REM * IDENTIFICA POR 

********** 

2400 DC=DC A (1/3) 

M 

2200 CLS: PRINT" /. 

2410 

EDIO DE ** 

CA 

IFDC<4 OTHENGOSUB2 470 

2625 REM * LA VARIABLE 

LCULO SIST.DOBLE /." 

2420 

"VW" 

2210 LOCATE 2 , 2 : PRINT" 

LOCATE 7 , 10 :PRINT"UNIDA 

, DE DONDE* 

MAS 

DES ASTRONOMICAS" 

2626 REM * PROVIENE EL 

A - DISTANCIA - PERIODO" 

2430 

GOSU 

2220 

LOCATEO, 5: PRINT"Di st .m 

B.Y CONT.* 

LOCATE2, 10 : PRINT"ENTRE 

edia entre" 

2627 REM * DE ACUERDO AL 

'O'lo que desee calcu- 

24 40 PRINT"comp. ="; DC 

VA 

lar . . . 

2450 GOSUB2580 

LOR Q' * 

w 

2460 GOTO 2200 

2628 REM * "VW" TENGA 

2230 

2470 

* * 

LOCATEO, 21 : A$="Dist .me 

DC=DC* 150000000 ! :LOCAT 

********** 

dia entre 

El 0, 10 : PRINT"K I L O M E 

2629 REM ' 

comp. (UA) " : GOSUB3 

T 

2630 

530 

R O S " : RETURN 24 30 

IFVW=2THENRETURN3780EL 

2240 INPUT""; DC 

2475 REM ' 

SERETURN 

2250 A$="Masa de las 

2476 REM * CALC. PERIODO 

2631 REM ' 

comp, r 

DE 

2632 REM ' 

esp.al 

COMP. ** 

2633 REM 

SOL" : GOSUB3530 : INPUT 

2477 REM * Y DECIDE EN 

****************** 

"";MC 

Q' U 

******** 

odo (a$os) " : GOS 

NIDADES * 

2634 REM * CALC. CONV. DE 

UB3530: INPUT""; P 

2478 REM * DAR EL RESUL- 

U 

2270 IF MC-0 THEN2320 

TADO 

NID. *** 

2280 IF P=0 THEN24 80 

******* 

2635 REM 

2290 IF DC=0 THEN2380 

2479 REM ' 

*★*★*****★**★★★★★* 

2300 

2480 CLS: PRINT"* CALCULO 

******** 

FORF=lTO20 : PRINT"Debe 

DE 

2636 REM ' 

haber una INCOGNITA 

L PERIODO ENTRE COMP. *" 

2637 REM ** PREPARA 

porlome 

2490 P=(DC A 3)/MC 

PANTALL 

nos" : NEXTF 

2500 P=P A (1/2) 

A (LONG) * 

2310 

2510 IFPC1THENGOSUB2560 

2638 REM ' 

FORD=1T03000 : NEXTD : GOT 

2520 LOCATE14, 10:PRINT"A 

2640 

O 2200 

% 

GOSUB3760: LOCATEO, 4: PR 

2314 REM ' 

O S" 

INT" MTS - KM - UA - AL - 

2315 REM ** CALC. MASA DE 

2530 

P 

C 

LOCATEO, 5: PRINT"Period 

SC - KPS - 

OMP . * * * 

o de las comp.=";P 

MPS" :X=0 : A=1 :B=2 

2317 REM ' 

2540 GOSUB2580 

:C=3:D=4 :E=5 :F=6:G=7 :H=8 : I J 

2320 CLS: PRINT"* CALCULO 

2550 GOTO 2200 

=9: J=10:K=11 :L=12:M=13 

MA 

2560 

2650 GOSUB3770 

SAS DE LAS COMPONENTES *" 

P=P*365 : IFPC1THEN2565E 

2660 IFSU$="MTS"THEN3280 

2330 MC= (DC A 3) / (P A 2) 

LSELOCATE14, 10:PRINT"D I 

2670 IFSU$="KM"THEN2740 

2340 LOCATEO, 6:PRINT"Masa 

A 

2680 IFSU$="UA"THEN2830 

d 

S" :RETURN2530 

2690 IFSU$="AL"THEN2920 

e las comp.=";MC 

2565 

2700 IFSU$="PSC"THEN301 0 

2350 PRINT"veces del SOL" 

P=P*24 :LOCATE14, 10:PRI 

2710 IFSU$="KPS"THEN3100 

2360 GOSUB2580 

NT"H ORA S" : RETURN2530 

2720 IFSU$="MPS"THEN3190 

2370 GOTO 2200 

2570 REM ' 

2730 GOTO 2650 

2374 REM ' 

2576 REM ** CICLO OPCIO- 

2731 REM ' 

2375 REM * CALC. DISTANC. 

NES 

2732 REM ** CALCULA KM Y 

C 

PARA CONT.* 

HS 

OMPONENT. * 

2579 REM ' 

****** 

2376 REM * Y DECIDE EN Q' 

2580 LOCATE3, 21: PRINT" 

2733 REM ' 

U 

* C:Cont. Z:Menu *" 

2740 GOSUB34 90 

NIDADES * 

2590 A$=INKEY$ 

2750 

2377 REM * DAR EL RESUL- 

2600 IF 

IFX=0THENX=VL* 1000ELSE 

TADO 

A$="C"ORA$="c"THEN2 

X=VL* 60 

******* 

630 

2760 

2378 REM ' 

2610 IF 

IFA=1THENA=VL* 1ELSEA=V 

2380 CLS: PRINT"* CALCULO 

A$="Z"ORA$="z"THENl 

L* 1 

DE 

00 

2770 IFB=2THENB=VL/ 

DIST. ENTRE COMPONEN- 

2620 GOTO 2590 

15000000 

TES*" 

2623 REM ' 

0#ELSEB=VL/2 4 


2780 IFC=3THENC=VL/ 
15757100 

0000 ! ELSEC=VL/744 
2790 IFD*4THEND=VL/ 
51368100 

0000 ! ELSED=VL/8928 
2800 IFE=5THENE=VL/ 
5.13681E 

+ 14 ELSEE-VL / 8 9 2 8 0 ! 

2810 IFF-6THENF-VL/ 
5.13681E 

+17ELSEF-VL/8 92800! 

2820 GOTO 3380 

2821 REM ' 

2822 REM ** CALCULA UA Y 
DI 

2823 REM ' 

2830 GOSUB34 90 
2840 

I FX=0THENX*=VL*1 5000000 
0000 !ELSEX-VL*1 440 
2850 

IFA=1THENA=VL*15000000 

0#ELSEA-VL*24 

2860 

IFB=2THENB=VL*1ELSEB=V 
L* 1 

2870 IFC-3THENC-VL/ 

63240 ! EL 
SEC=VL/31 

2880 IFD’=4THEND=VL/ 
206162.4 
#ELSED»VL/365 
2890 IFE=5THENE=VL/ 
20616200 
0 !ELSEE~VL/3650 
2900 IFF-6THENF-VL/ 
20616200 

0000 ! ELSEF-VL/36500 ! 

2910 GOTO 3380 

2911 REM ' 

2912 REM **** CALCULA AL 
Y 

MES **** 

2913 REM ' 

2920 GOSUB34 90 
2930 

IFX=0THENX=VL*9 . 46E+15 
ELSEX=VL* 43800 ! 

2940 

IFA=1THENA=VL* 94600000 
00000 ! ELSEA=VL* 730 
2950 

IFB=2THENB=VL* 63240 ! EL 

SEB=VL* 30.4 

2960 

IFC«3THENC=VL* 1ELSEC-V 
L* 1 

2970 IFD=4THEND“VL/ 

3.26ELSE 

D-VL/12 

2980 IFE-5THENE=VL/ 

3260ELSE 

E-VL/120 

2990 IFF*=6THENF=VL/ 
3260000# 


ELSEF-VL/1200 

3000 GOTO 3380 

3001 REM ' 

3002 REM *** CALCULA PSC 

Y 

A%0 ***** 

3003 REM ' 

3010 GOSUB3490 
3020 

IFX=0THENX=VL* 3 . 08 7E+2 
2ELSEX=VL* 525600! 

3030 

IFA=1THENA=VL*3. 087E+1 

9ELSEA=VL* 87 60 

3040 

IFB=2THENB=VL*2061 62 . 4 

#ELSEB=VL* 365 

3050 

IFC=3THENC=VL* 3 . 2 6ELSE 

C=VL*12 

3060 

IFD=4THEND=VL* 1ELSED=V 
L* 1 

3070 IFE=5THENE=VL/ 

1000ELSE 

E-VL/10 

3080 IFF=6THENF=VL/ 

1000000 # 

ELSEF-VL/100 

3090 GOTO 3380 

3091 REM ' 

3092 REM *** CALCULA KPS 

Y 

DEC **** 

3093 REM ' 

3100 GOSUB34 90 
3110 

IFX=0THENX=VL*3 . 087E+2 
5ELSEX-VL* 52 5 6 0 0 0 # 

3120 

IFA=1THENA=VL*3. 087E+2 
2ELSEA=VL* 87 600! 

3130 

IFB=2THENB=VL*2061 6200 

0 ! ELSEB=VL*3650 

3140 

IFC“3THENC“VL* 32 60ELSE 

C-VL*120 

3150 

IFD=4THEND=VL* 1000ELSE 

D=VL*1 0 

3160 

IFE-5THENE=VL* 1ELSEE-V 
L* 1 

3170 IFF«6THENF*=VL/ 

1000ELSE 

F-VL/10 

3180 GOTO 3380 

3181 REM ' 

3182 REM ** * CALCULA 
MPS Y 

SIG **** 

3183 REM ' 

3190 GOSUB34 90 
3200 

IFX-OTHENX-VL* 3 . 087E+2 
8ELSEX“VL*52560000# 


3210 

IFA=1THENA“VL*3 . 08'7E+2 
4ELSEA=VL*87 6000 ! 

3220 

IFB=2THENB=VL*20616200 
0000 !ELSEB=VL*36500 ! 

3230 

IFC=3THENC=VL*32 60000# 

ELSEC=VL * 1 2 0 0 

3240 

IFD=4THEND=VL* 1000000# 

ELSED-VL*100 

3250 

IFE=5THENE=VL* 100 OELSE 

E=VL*1 0 

3260 

IFF=6THENF=VL* 1ELSEF=V 
L* 1 

3270 GOTO 3380 

3271 REM ' 

3272 REM *** CALCULA MTS 
Y 

min **** 

3274 REM ' 

3280 GOSUB34 90 
3290 

IFX=OTHENX=VL* 1ELSEX=V 
L* 1 

3300 IFA=1THENA=VL/ 

1000ELSE 

A=VL/60 

3310 IFB=2THENB=VL/ 
15000000 

0000 !ELSEB=VL/1440 
3320 IFC=3THENC=VL/ 

9. 46E+15 
ELSEC-VL/44640! 

3330 IFD=4THEND=VL/ 
3.087E+2 

2ELSED=VL/535680 ! 

3340 IFE-5THENE=VL/ 
3.087E+2 

5ELSEE-VL/5356800# 

3350 IFF=6THENF=VL/ 
3.087E+2 

8ELSEF=VL/ 53568000# 

3360 GOTO 3380 
3365 ' 

******************* 

******* 

3370 REM ' 

3372 REM ** IMPRIME EN 
PANT 

ALLA LOS* 

3373 REM ******** RE- 
SULTA 

DOS ***** 

3374 REM ' 

3380 

CLS : LOCATEO , 4 : IFG-7THE 
NPRINT; X; "MTS"ELSEPRINT; X 
MIN" 

3390 

IFH=8THENPRINT; A; "KM"E 
LSEPRINT; A; "HS" 

3400 

IFI J-9THENPRINT; B; "UA" 


ELSEPRINT; B; "DIAS" 

3410 

IFJ«10THENPRINT;C; "AL" 
ELSEPRINT; C; "MESES" 

3420 

IFK- 1 1 THENPRI NT ; D ; "P SC 
"ELSEPRINT; D; "A%OS" 

3430 

IFL-12THENPRINT; E; "KPS 
"ELSEPRINT; E; "DECADAS" 
3440 

IFM=13THENPRINT; F; "MPS 
"ELSEPRI NT ; F ; "SIGLOS" 
3450 LOCATEO, 2:PRINT"0 0 
OOOOOOOOO 
0 0" 

3460 LOCATEO ,13: PRINT"0 
0 

OOOOOOOOO 
0 O" 

3470 GOSUB2580 

3480 GOTO 2640 

3481 REM ' 

3482 REM *** SUBRUTINA 
DE E 

NTR. DE * 

3483 REM ********** 

DATOS * 

********** 

3485 REM ' 

34 90 CLS: PRINT" «< 

UN I DA 

D A INGRESAR EN ";SU$;" 

«< 

w 

3500 

LOCATEO, 22 : A$«"Ingrese 
el 

valor" :GOSUB3530 : INPUT" 
VL 

3510 RETURN 

3520 GOTO3520 

3521 REM ' 

3522 REM ** SUBRUTINA DE 
RE 

TARDO ** 

3523 REM ****** DEL 
CURSOR 

******** 

3524 REM ' 

3530 LOCATE,, 1 

3531 F0RI=1T0LEN (A$) 

3540 PRINTMID$ (A$, 1,1); 
3550 BEEP 

3560 NEXT I 

3570 LOCATE, , 0 : RETURN 

3571 REM ' 

3572 REM ** GRAFICO 
EXPLICA 

TIVO **** 

3573 REM ** DE CALC.VEL. 
ES 

PACIAL ** 

3575 REM ' 

3580 


SCREEN2 : COLOR1 5 , 1 , 1 : OP 

EN"GRP : "AS#1 

3590 

PSET (12 , 37 ) : PRINT# 1 , " 

0 " 

3600 

PSET (15, 60) : PRINT# 1, "N 
":PSET (15,75), 1:PRINT#1, " 1 " 
3610 

PSET (145, 32) :PRINT#1 , " 

M 

3” :PSET (145,42) ,1:PRINT#1 
, "N" 

3620 

PSET (70, 25) , 1 : PRINT# 1, 

"N" : PSET ( 7 0 , 22 ) :PRINT#1,"M" 
:PSET (60, 25) :PRINT#1 , "2" 
3630 CIR- 
CLE (15,40) ,20, , , ,1. 

4 

3640 LINE (20,20)- 
(220,20) : L 
INE (220, 20) - 

(220. 60) : LINE (2 
5,38)- 

(220,22) :LINE (25, 41) - 

(220. 60) :LINE (220, 21) - 
(200, 

55) 

3650 Y-0 
3660 

F0RX=1T0212STEP9 :PSET ( 

X, Y) : PRINT# 1 , "C" :NEXTX: IFY- 
9 5THEN3 6 7 0ELSEY-Y+ 95 : GOTO 
3 

660 

3670 

PSET (0,110) : PRINT# 1, "1 
) Orb. Tierra" : PRINT# 1, "2) Par 
ala je" : PRINT#1 , "3 ) Mto . Propi 
o" :PRINT#1, "por 
a$o": PRINT# 

1, "WWWWWWWWWWWW 
" : PRINT#1 , "a) Vel . Radial" : PR 
INT#1, "b) Vel . Espac . " : PRINT# 
1, "c) Vel. Tang." 

3680 

PSET (10, 185) , 1 :PRINT#1 
,"< Z : Menu <" 

3690 

PRESET (105, 100) ,12:DRA 
W"rl08d901108u90" :PAINT (120 
,120) , 12 
3700 

PSET (110, 110) , 1 : DRAW"r 
100d75" :LINE (210, 110) - 
(170, 

170) , 1: LINE (210, 110)- 
(30, 14 

5) , 1: LINE (210, 185)- 
(30, 145) 

,1 

3710 

PSET (115,130) , 12 :PRINT 
#1, "a" :PSET (170, 150) , 12:PRI 


NT#1 , "b" :PSET (202,152) , 12 :P 
RINT#1 , "c" 

3715 

PSET (220,13) , 1 :PRINT#1 

H // 

3720 CLOSE# 1 
3730 S$=INKEY$ 

3740 

IFS$="Z"ORS$="z"THEN10 

0 

3750 GOTO 3730 

3751 REM ' 

3752 REM ** SUBRUTINA 
PREPA 

RADO DE ** 

3753 REM ** SELECCION 
**** 

******* ** 

3754 REM ' 

3760 

CLS : LOCATEO, 0: PRINT" 
««< CONVERSION DE 
UN I DAD 

ES <««": RETURN 

3770 

L0CATE20, 1 5 : PRINT"MAYU 
SCULAS" : LOCATEO , 22 : A$="Sele 
ccin x 

unidad. . " : GOSUB3530 
: I NP UT " " ; S U $ : RET URN 

3771 REM ' 

3772 REM ** PREPARA 
PANTALL 

A (TIEMP)* 

3775 REM ' 

3780 

GOSUB3 760: LOCATE 1 , 3 : PR 
INT"MIN - HS- DIA - MES 
- A 

%0 - DEC - 
SIG" :G=9 :H=2 : 1 J= 

7: J=6:K=5:L=4 :te=3:X=3:A=5:B 

“7:C=2:D-l:E-0:F-4 

3790 GOSUB3770 

3800 VW-2 

3810 

IFSU$="MIN"THEN3280 
3820 IFSU$="HS"THEN2740 
3830 

IFSU$="DIA"THEN2830 

3840 

IFSU$="MES"THEN2920 

3850 

IFSU$="A%0"THEN3010 

3860 

IFSU$="DEC"THEN3100 

3870 

IFSU$«"SIG"THEN3190 

3880 GOTO3790 

3890 'SAVE"CIENTIF . CnF" 



CONCURSO NEHSURL BASIC TUTOR. 


Auspiciado por TELEMATICA S.A. fabricante en Argentina de las computadoras 

personates TALENT MSX 

Para participar en este certamen deben senalar cual es la information correcta que presenta cada 
item. Junto con las respuestas deben remitir los datos en el correspondiente cupon. Los premios 
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el envio pagando el franqueo contrareembolso. Los premios podran ser reclamados dentro de los 

120 dfas despues de haber sido anunciados. 


Ganador del MSX-TEST N 1 2 9 

Jorge Daniel Frencia 


Respuestas correctas 

1) a. II. 2) b) Fija el ancho de columnas. 3) a. Programa de control 
para microcomputadoras. 4) c. el juego de los dardos. 5) a. utilitario. 


MSX TEST N 2 14 - CIERRE 1 DE ABRIL DE 1989 


1. *,Desde que base antartica se 
establecid la primera comunica- 
cion telematica? 

a. General Belgrano 

b. Vicecomodoro Marambio 

c. Esperanza 

2. ^En cuantos modulos esta 
dividido el GEOS PRINT 
SHOP? 

a. tres 

Nombre y apellido 

Direction: 

Documento : 

Que es lo que mas me gusta de la revista:. 

Que le agregarfa: 

Que es lo que no me gusta: 


b. cinco 

c. siete 

3. ^Cual de estos tres ensambla- 
dores no existe? 

a. Zen 

b. Simple Asm 

c. First Assembler 

4. En las Extensiones al MSX- 
LOGO, £Como se llama el progra- 
ma ejemplo generado por el 


Edad: Maquina:. 


sistema musical? 

a. Beatles 

b. Bach 

c. Mozart 

5. ^Cuantas opciones tiene el 
menu principal de ACAMATI- 
CA? 

a. 10 

b. 15 

c. 18 







INCON DEL USUARIO 


D E TALENT M S X 


INVASORES 
DEL ESPACIO 

Si bien todos conocemos el tradicional “ Space Invaders’ esta version simplifica- 
da - aunque dificil - tiene su originalidad. Es producto de los conocimientos adqui - 
ridos por los usuarios del Centro de Asistencia de Flores. 



L os Centres de Asistencia in- 
corporan distintos cursos pa- 
ra computation segun sea el 
estilo del mismo. En LICIN, el Centro 
de Asistencia de Flores, se desarro- 
llan diversos cursos sobre MSX, in- 
cluyendo cOdigo mdquina, robOtica, 
reparation de MSX (para tOcnicos e- 
lectrOnicos), etcOtera. 

El siguiente es un programa rca 1 izado 
como trabajo prdctico final do los 
concunrentes al curso del afio 1988. 
Los alumnos partieron de una base de 
conocimientos en BASIC y llegaron 
al desarrollo de este juego, que es una 
version simplificada (aunque bastan- 
te dificil) del SPACE INVADERS -el 
clOsico mata-marcianos. Se incluye el 


listado fuente para cargar con el MSX 
Duad y un listado en MSX-BASIC 
para cargarlo si no se posee un ensam- 


blador. 

Centro de Asistencia Flores - 
Curso de Assembler 


CENTROS DE ASISTENCIA AL USUARIO DE TALENT MSX 


CAPITAL FEDERAL 

« 

Taller Logo de computation 
Junta 1930 

Centro de Computation Clfnica 
Asistencia al Usuario Discapaciiado 
Ramsay 2250 - PabellOn F 
Tel. 784-2018 

CAU Postal, Apartado Especial 
N° 69, (1000) Capital Federal 

Barrio Norte 

Uriburu 1063 - Tel. 83-6892/826- 
6692 


Belgrano 

Cabildo 735 - Tel. 772-9088 

Flores 

Gral. Artigas 354 - Tel. 612-3902 

San Telmo 

Chile 1345 - Tel. 37-0051 al 54 

GRAN BUENOS AIRES 
Caseros 

Medina y Alberdi - ler piso - Tel. 750- 
8016. 

Castelar 

C. Casares 997 - Tel. 629-2247 


Lands 

Caaguazu 2186 - Tel. 240-0378 

MorOn 

Belgrano 160 - Tel. 629-3347 

Ramos Mejia 

Bolivar 55 - ler. piso - Tel. 658-4777 

San Justo 

Peru 2515 (esq. Arieta) 

Vicente L6pez 

Av. Maipu 625 - Tel. 797-672 

Virreyes - Pdo. de San Fernando 

Avellaneda 1697 - Tel. 745-7963 



; + 


+ 






; + 

Space Invaders MSX 

GTTRIG EQU 

0D8H 


CALL 

CHPUT 

+ 



KILBUF EQU 

156H 


INC 

IX 

; + 


+ 

LDIRMV EQU 

59H 


# INC 

IX 

; + Programado por los a- 

LDIRVM EQU 

5CH 


DJNZ 

CIELO 

lumnos 

del 

+ 

LINL32 EQU 

0F3AFH 


LD 

HL, 0113H 

; + curso ASSEMBLER I de 

POSIT EQU 

0C6H 


CALL 

POSIT 

LICIN 

+ 


T32PAT EQU 

0F3C5H 

/ 



; + 

Centro 

de Asisten- 

WRTVRM EQU 

4DJb 

7 

Dibuja la 

plataf orma 

cia Talent: 

+ 

7 


del caftdn 


; + 

Dario COLOM- 

; SCREEN1 : 

WIDTH3 0 : CO- 

7 



BO 


+ 

LORI 5,1,1: KEYOFF 


LD 

HL, 6881 

; + 


Carlos POR- 




LD 

A, 8 

TO 


+ 

LD 

A, 30 


LD 

BC, 30 

; + 

Juan Carlos RI- 

LD 

(LINL32 ) , A 


CALL 

FILVRM 

CO 

+ 


LD 

A,1 

/ 



; + 


+ 

CALL 

CHGMOD 

/ 

Escribe "SONARON:" 

; + Profesor: 

Hugo Daniel 

LD 

HL, FORCLR 

/ 



Caro 

+ 


LD 

(HL) , 15 


LD 

HL, TXT 

; + 


+ 

INC 

HL 


LD 

DE, 6145 

/ 



LD 

(HL) ,1 


LD 

BC, 8 

; Coloca el programa a par- 

INC 

HL 


CALL 

LDIRVM 

tir de 

SH8100 


LD 

(HL) ,1 

7 



7 



CALL 

CHGCLR 

7 

Copia Patrones de Spri- 


ORG 

8100H 

CALL 

ERAFNK 

tes en VRAM 


/ 

; Etiquetas del programa 

7 

; Programa 

FUNCION 2 

/ 

XOR 

A 

7 



(KEY2 , " . . .") 



CALL 

CALPAT 

ALTO 

EQU 

10 

7 



EX 

DE, HL 

BEEP 

EQU 

0C0H 

LD 

HL, F2 


LD 

HL, PAT 

BREAKX 

EQU 

0B7H 

LD 

DE, FNK2 


LD 

BC, 32 

CALATR 

EQU 

87H 

LD 

BC, 16 


CALL 

LDIRVM 

CALPAT 

EQU 

84H 

LDIR 


7 



CARACT 

EQU 

46 

7 


7 

Calcula el inicio de la 

CHGCLR 

EQU 

62H 

; Dibuja 12 estrellas en el 

Tabla de 


CHGMOD 

EQU 

5FH 

cielo y 


7 

Atributos de 

s Sprites y 

CHPUT 

EQU 

0A2H 

7 ejecuta el equivalente a 

lo guarda en 


CLRSPR 

EQU 

69H 

LOCATE 18,0 


7 

la RAM (COM) 


CLS 

EQU 

0C3H 

• 

/ 


7 



DSPFNK 

EQU 

0CFH 

LD 

B, 12 


XOR 

A 

ERAFNK 

EQU 

0CCH 

LD 

IX, STARS 


CALL 

CALATR 

FILVRM 

EQU 

56H 

CIELO: LD 

L, (IX+0) 


t n 

/pAM\ UT 

FNK2 

EQU 

0F88FH 

LD 

H, (IX+1) 


XjU 

, Xlij 

FORCLR 

EQU 

0F3E9H 

CALL 

POSIT 

/ 



GTSTCK 

EQU 

0D5H 

LD 

A, CARACT 

/ 




INTERIOR DEL PAIS 
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• Gral. Paz 257 - Tel. (09 1) 3 1 582 
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Calle48 No. 529 - Tel. (021) 249905 al 
07 

Mar del Plata - Buenos Aires 

Av. Luro 3071 - 13o. “A” -Tel. (023) 
43430 
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Calle 61 No. 2949 - Tel. (0262) 26583 


Comodoro Rlvadavia • Chubut 

San Martin 263 - Local 22 - Tel. 
(0967) 20794 

Cdrdoba - Cdrdoba 

9 de julio 533 - Tel. (051) 20083 

Villa Marla - Cbrdoba 

Corrientes 1159 - 2do. piso - Tel. 
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Paran* - Entre Rios 
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291348/293151 

Viedma - Rio Negro 

San Martin 24 -Tel. (0920) 21888 f§ 

Rosario - Santa Fe 

Bardn de Maua 1088 - Tel. (041) II 
210747 

Santa Fe - Santa Fe 
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41832 m 

San Juan- San Juan 

Santa Fe 409 Este 

S.M.de Tucumdn - TucumAn 

Bolivar 374 - Tel. (081) 245007 
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M 

II 


9 

; Guarda en RAM (BCO) ca- 
da cu£ntos 

; ciclos descienden los 
Invasores 


LD 

A, ALTO 

LD 

(BCO) , A 

/ 

; Bucle principal del pro- 

grama 

PROG: CALI 

1UND 

CALL 

aTV 

LD 

A, (PTOS) 

CP 

20 

JR 

NZ, NOFIN 

LD 

A, (MPUM) 

XOR 

A 

JR 

Z, GANAR 

NOFIN : CALL 

BREAKX 

JR 

C , CORTE 

LD 

BC, 03FFH 

CALL 

FRENO 

CALL 

CANON' 

CALL 

VTPUM 

CALL 

BALA 

CALL 

COINC 

CALL 

INV 

CP 

175 

JR 

NZ, PROG 

9 

; Rutina por si 

los inva- 

sores tocan la 
; plataforma 

FINAL: CALL 

BEEP 

LD 

A, 209 

LD 

(ATR+16) , A 

LD 

(ATR+20 ) , A 

CALL 

ATV 

CALL 

BEEP 

LD 

HL, DERR 

LD 

DE, 6507 

LD 

BC, 10 

CALL 

LDIRVM 

JR 

FPROG 

9 

; Rutina por si 

mataste a 

20 invasores 

GANAR : LD 

A, 209 

LD 

(ATR+24 ) , A 

CALL 

ATV 

CALL 

BEEP 

LD 

HL, VICT 

LD 

DE, 6508 

LD 

BC, 8 

CALL 

LDIRVM 

JR 

FPROG 


; Rutina por si pulsaste 
CTRL + STOP 


INC 

HL 

LD 

(HL) , 4 

INC 

HL 

LD 

(HL) , 4 

CALL 

CHGCLR 

CALL 

DSPFNK 


; Fin del bucle principal 
del programa 
; (Borra el buffer del te- 
clado) 

FPROG: CALL KILBUF 

RET 

; ** SUBPROGRAMAS ** 

; Verifica si hay invaso- 
res en pantalla 
; o si tienen que apare- 


cer otros 4 m£s 


ROUND: LD 

HL, MPUM 

LD 

A, (HL) 

CP 

28 

RET 

C 

INC 

A 

LD 

(HL) , A 

XOR 

A 

RET 

NZ 


/ 

; Verifica si mataste a 20 
invasores 


LD A, (PTOS) 

CP 20 

RET Z 

/ 

; Inicializa la Tabla de 
Atributos de 
; Sprites en la RAM 


LD 

A, 16 

LD 

HL, ATR 

LD 

DE, 3 

LD 

B, 4 

LD 

(HL) , 9 

INC 

HL 

LD 

(HL) , A 

ADD 

A, 72 

ADD 

HL, DE 

DJNZ 

RET 

BIS 


/ 

; Copia la Tabla de Atri- 


but os a VRAM 


ATV: LD 

HL, ATR 

LD 

DE, (COM) 

LD 

BC, 28 

CALL 

LDIRVM 

RET 



; Mueve el cafi6n hacia am- 
bos lados segun 
; el cursor que se presio- 
ne 

CANON: 


ES7 : 


MVCAN : 


; Verifica si debe desapa- 
recer el PUM 

; cuando est& en pantalla 





J 

\TTPUM: 

LD 

A, (TPUM) 


INC , 

A 


LD 

(TPUM) , A 


OR 

A 


RET 

NZ 


LD 

A, 209 

9 

LD 

RET 

(ATR+24) , A 


9 

; Verifica si la bala no 
fue disparada. 


; para saltar a BANG. Si 
fue disparada y 
; lleg6 a 4, desaparece de 
la pantalla, 

; sino sube una posicibn 


BALA : LD 

A, (ATR+20) 

CP 

209 

JR 

Z , BANG 

CP 

4 

JR 

NZ , MVBALA 

LD 

A, 210 

MVBALA: DEC 

A 

LD 

(ATR+20) , A 

RET 



; Verifica si se pulsb la 
barra; de ser 
; asi, se modifica la Ta- 
bla de Atributos 
; de Sprites en la RAM pa- 
ra que sea 
; disparada la bala 


XOR A 

CALL GTSTCK 

CP 3 

JR NZ , ES7 

LD A, (ATR+17 ) 

CP 30*8 

RET Z 

INC A 

JR MVCAN 

CP 7 

RET NZ 

LD A, (ATR+17) 

CP 1*8 

RET Z 

DEC A 

LD (ATR+17), A 

RET 


; (Borra los 
jecuta CLS: 

sprites y e- 

Ret rasa la 
programa 

marcha del 

BANG: XOR 

CALL 

A 

GTTRIG 

; COLOR15, 4, ■ 

4:KEYON) 

9 


OR 

A 

• 

/ 


FRENO: DEC 

BC 

RET 

Z 

CORTE : CALL 

CLRSPR 

LD 

A, C 

LD 

A, 174 

XOR 

A 

OR 

A 

LD 

(ATR+20) , A 

OR 

A 

JR 

NZ, FRENO 

LD 

A, (ATR+17) 

CALL 

CLS 

DEC 

C 

LD 

(ATR+21 ) , A 

LD 

LD 

HL, FORCLR 
(HL) , 15 

DJNZ 

RET 

FRENO 

RET 





; Verifica si 

la bala fue 

; Inicializa el 

contador 


OR 

A 

disparada; de 


del tiempo que 



RET 

NZ 

; ser asi, verifica si hay 

; aparece el PUM en panta- 


CALL 

LADO 

coincidencia 


lla (TPUM) y 



LD 

A, ALTO 

; entre sprites (BIT 5, A) . 

; anota en MPUM 

si matas- 


LD 

(BCO) , A 

Si es asi. 


te a un invasor 



LD 

HL, ATR 

! ; busca el invasor mas a la 

; Si mataste a los 4 de la 


LD 

DE, 4 

izquierda de 


pantalla. 

un valor 


LD 

B, 4 

; la pantalla y salta a 

; carga en MPUM 

BAJA: 

LD 

A, (HL) 

COMP . Luego ve 

para ser usado 



CP 

209 ! 

; si hay m£s invasores pa- 

; como contador 

antes de 


JR 

Z, FBAJA 

ra comparar 


hacer aparecer 



CP 

175 

. 


; otros 4 invasores. Lue- 


RET 

Z 

COINC: LD 

A, (ATR+20) 

go salta a la 



INC 

A 

CP 

209 

; rutina de punta je (PTJE) 


LD 

(HL) , A 

RET 

z 

y coloca en 


FBAJA: 

ADD 

HL, DE 

LD 

A, (0F3E7H) 

; el registro C 

el valor 


DJNZ 

BAJA 

BIT 

5, A 

"12" para 



RET 


RET 

NZ 

; indicar que no 

debe ha- 

7 



LD 

DE, (ATR+20) 

ber otras 


; Mueve a los 

invasores de 

LD 

BC, 0 

; comparaciones 


la pantalla 


HOR: LD 

HL, ATR 

/ 


; dos 

posiciones a dere- 

ADD 

HL, BC 

VLTA: LD 

A, -50 

cha o 

izquierda 

LD 

A, (HL) 

LD 

(TPUM) , A 

; segun sea par o impar el 

CP 

209 

LD 

A, C 

valor 

dado 


CALL 

NZ, COMP 

INC 

A 

7 po r 

el registro R 

FHOR: LD 

A, C 

LD 

HL, MPUM 

/ 



CP 

12 

ADD 

A, (HL) 

LADO: 

PUSH 

AF 

RET 

z 

CP 

28 


LD 

HL, ATR+1 

ADD 

A, 4 

JR 

NZ, FVLTA 


LD 

DE, 4 

LD 

C, A 

XOR 

A 


LD 

B, 4 

JR 

HOR 

SUB 

ALTO 


LD 

A, R 

• 


SUB 

ALTO 


BIT 

0, A 

; Compara si 

hay coinci- 

SUB 

ALTO 


JR 

NZ, IZQ 

dencia horizontal 

SUB 

ALTO 

DER: 

LD 

A, (HL) 

; entre la bala y el inva- 

FVLTA: LD 

(MPUM) , A 


ADD 

A, 2 

sor; si la hay. 

CALL 

PTJE 


LD 

(HL) , A 

; verifica la coincidencia 

C12 : LD 

C, 12 


ADD 

HL, DE 

vertical. Si 


RET 



DJNZ 

DER 

; la hay, salta a PUM 

7 



JR 

FLADO 

7 


; Increment a el 

valor de 

IZQ: 

LD 

A, (HL) 

COMP : SUB 

7 

PTOS y muestra 



SUB 

2 

CP 

E 

; en pantalla tantos cora- 


LD 

(HL) , A 

JR 

NC, C12 

zones como 



ADD 

HL, DE 

ADD 

A, 15 

; indique ese valor 


DJNZ 

IZQ 

CP 

E 

7 


FLADO: 

POP 

AF 

JR 

C, C12 

PTJE : LD 

A, (PTOS) 


RET 


INC 

HL 

INC 

A 

7 



LD 

A, (HL) 

LD 

(PTOS) , A 

; Definicidn 

para la fun- 

SUB 

4 

LD 

B, 0 

ci6n 2 



LD 

B, 9 

LD 

C, A 

7 



VERT : CP 

D 

LD 

A, 3 

F2 : 

DB 

21, 'BLO- 

JR 

Z , PUM 

LD 

HL, 6154 

AD"SPIN",R' , 

13,0 

INC 

A 

CALL 

FILVRM 

7 



DJNZ 

VERT 

CALL 

BEEP 

; Mensajes que aparecen 

RET 


RET 


por pantalla 


/ 

; Modifica la 

Tabla de A- 

/ 

; Verifica si en el pre- 

TXT: 

DB 

'SONARON: ' 

tributos en RAM 

sente ciclo debe 




; como para escribir PUM en 

; mover a los 

invasores 

DERR: 

DB 

'TE SONA- 

la pantalla 


(debe hacerlo 1 


MOS' 



; y borrar al 

invasor y a 

; de cada 10 ciclos) . En 




la bala 


caso afirmativo 


VI CT: 

DB 

'VENCIS- 

/ 


; salta a LADO. 

Iniciali- 

TE' 



PUM: LD 

A, (HL) 

za BCO y, de 


/ 



LD 

(ATR+25) , A 

; estar en condiciones, 

; Posiciones 

de las es- 

DEC 

HL 

desciende cada 


trellas 


LD 

A, (HL) 

; invasor una posicidn ho- 

7 



LD 

(ATR+24 ) , A 

rizontal 


STARS: 

DW 

0211H, 

LD 

A, 209 

7 


0304H, 

080AH 

, 0A08H 

LD 

(ATR+20) , A 

INV: LD 

A, (BCO) 


DW 

0B0FH, 

LD 

(HL) , A 

DEC 

A 

0C06H, 

0F07H 

, 120EH 



LD 

(BCO) , A 


DW 

1505H, 


190CH, 1C03H, 1D09H 

• 

/ 

10080 DATA 

E, 2E, CD 

; Definioidn de los sprites 

10090 DATA 

; (Caft6n ; - Bala - Invasor - 

3, 10, EC 

Pum) 

10100 DATA 

• 

/ 

0,21, El 

PAT: DB 18H, 18H, 18H, 

10110 DATA 

18H 

0, CD, 56 

DB 7EH, OFFH, 

10120 DATA 

OFFH, 99H 

1,18,01 

DB 18H, 18H, 18H, 

10130 DATA 

18H 

F, CD, 84 

DB 18H, 18H, 18H, 

10140 DATA 

18H 

1,20,00 

DB 66H, 24H, 

10150 DATA 

OFFH, 99H 

7,00,22 

DB ODBH, OFFH, 

10160 DATA 

0C3H, 7EH 

6, B2, CD 

DB OF OH, 90H, 

10170 DATA 

OFOH, 0A8H 

A, D9,B2 

DB OADH, 2FH, 

10180 DATA 

3DH, 05H 

7, B2, AF 

• 

/ 

10190 DATA 

; Tabla de Atributos de los 

8,51,01 

Sprites 

10200 DATA 

; (4 Invasores - Caftdn - Ba- 

D, 39, B1 

la - Pum) 

10210 DATA 

r 

1 , CD, 8B 

ATR: DB 9, 8*2, 2, 2 

10220 DATA 

DB 9,8*11,2,2 

F, 20, CF 

DB 9,8*20,2,2 

10230 DATA 

DB 9,8*29,2,2 

2,C8,B2 

DB 175,124,0,8 

10240 DATA 

DB 209,0,1,4 

1, CD, CO 

DB 209,0,3,6 

10250 DATA 


B, 19, 01 

; Variables del programa 

10260 DATA 


8, 32, 3E 

COM: DW 0000H 

10270 DATA 
2, B1,CD 

BCO: DB 0 

10280 DATA 
1, 6C, 19 

MPUM: DB 0 

10290 DATA 
0,18,19 

TPUM: DB 0 

10300 DATA 
D, C3, 00 

PTOS: DB 0 

10310 DATA 
3,36,04 

END 

10320 DATA 
0, CD, CF 
10330 DATA 

Listado MSX BASIC: 

1, D7, B2 
10340 DATA 

10 CLEAR 200, SHB000 

7, AF, CO 

20 CLS :PRINT "CARGANDO . . . " 

10350 DATA 

30 GOSUB10000 : A=USR (0) :END 

8, 3E, 10 

10000 RESTORE 10020 :FOR I%= 

10360 DATA 

SHB000 TO SHB2D9: READ A$ : 

0, 06, 04 

POKE 1% , VAL ( , 'SH''+A$) :NEXT 

10370 DATA 

10010 DEFUSR=SHB000 :RETURN 

8,19,10 

10020 DATA 3E, IE, 32,AF,F3, 3 

10380 DATA 

E, 01, CD 

D,5B,D4 

10030 DATA 5F,00,21,E9,F3,3 

10390 DATA 

6, OF, 23 

C, 00, C9 

10040 DATA 36, 01, 23, 36, 01, C 

10400 DATA 

D, 62, 00 

D, 10, F8 

10050 DATA CD,CC,00,21,56,B 

10410 DATA 

2, 11, 8F 

E, 03, 20 

10060 DATA F8, 01, 10, 00,ED,B 

10420 DATA 

0, 06, 0C 

0, C8, 3C 

10070 DATA DD, 21, 80, B2, DD, 6 

10430 DATA 

E, 00, DD 

A, C9, B2 


66, 01, CD, C6, 00, 3 

10440 DATA 
9, B2, C9 

FE,08,C8,3D,32,C 

A2, 00, DD, 23, DD, 2 

10450 DATA 
8,B2,B7 

3 A, D8, B2, 3C, 32, D 

21,13,01,CD,C6,0 

10460 DATA 
2, C9, 3A 

C0,3E,D1,32,D0,B 

1A, 3E, 08, 01, IE, 0 

10470 DATA 
B, FE, 04 

CC, B2, FE, Dl, 28, 0 

00,21, 66, B2, 11,0 

10480 DATA 
2, CC, B2 

20, 02, 3E, D2, 3D, 3 

08, 00, CD, 5C, 00, A 

10490 DATA 
7, C8, 3E 

C9, AF, CD, D8, 00, B 

00, EB, 21, 98, B2, 0 

10500 DATA 
9, B2, 32 

AE, 32, CC, B2, 3A, C 

CD, 5C, 00, AF,CD, 8 

10510 DATA 
2,FE, Dl 

CD, B2, C9, 3A, CC, B 

D4, B2, 3E, 0A, 32, D 

10520 DATA 
F, CO, ED 

C8,3A,E7,F3,CB, 6 

FD, B0, CD, 22, Bl, 3 

10530 DATA 
0, 21, B8 

5B, CC, B2, 01, 00, 0 

FE, 14, 20, 06, 3 A, D 

10540 DATA 
4,B1,B1 

B2, 09, 7E,FE,D1,C 

28, 3D, CD, B7, 00, 3 

10550 DATA 
4, 4F, 18 

79,FE,0C,C8,C6,0 

FF, 03, CD, 30, Bl, C 

10560 DATA 
F,C6, OF 

ED, D6, 07, BB, 30, 3 

CD, 58, Bl, CD, 67, B 

10570 DATA 
6,04,06 

BB, 38, 3A, 23, 7E, D 

Bl, CD, 0E, B2, FE, A 

10580 DATA 
0, FA, C9 

09, BA, 28, 04, 3C, 1 

CD,CO,00,3E,D1,3 

10590 DATA 
E, 32, DO 

7E, 32, Dl, B2, 2B, 7 

32,CC,B2,CD, 22, B 

10600 DATA 
2, 77, 3E 

B2, 3E, Dl, 32, CC, B 

00,21,6E,B2,11,6 

10610 DATA 
C, 21, D7 

CE,32,D8,B2,79,3 

0A, 00, CD, 5C, 00, 1 

10620 DATA 
9, AF, D6 

B2, 86, FE, 1C, 20, 0 

Dl, 32, DO, B2, CD, 2 

10630 DATA 
6, OA, 32 

OA, D6, OA, D6, OA, D 

C0,00,21,78,B2,1 

10640 DATA 
E,0C,C9 

D7, B2, CD, F8, Bl, 0 

01,08,00,CD,5C,0 

10650 DATA 
9,B2, 06 

3 A, D9, B2, 3C, 32, D 

CD, 69, 00, AF, B7, C 

10660 DATA 
A, 18, CD 

00,4F,3E,03,21,0 

21,E9,F3,36,0F,2 

10670 DATA 
9, 3A, D6 

56, 00, CD, CO, 00, C 

23, 36, 04, CD, 62,0 

10680 DATA 
7, CO, CD 

B2,3D,32,D6,B2,B 

00, CD, 56, 01, C9, 2 

10690 DATA 
6, B2, 21 

35, B2, 3E, OA, 32, D 

7E, FE, 1C, D8, 3C, 7 

10700 DATA 
6, 04 , 7E 

B8,B2,11,04,00,0 

3A,D9,B2,FE, 14, C 

10710 DATA 
F,C8, 3C 

FE,Dl,28,05,FE,A 

21,B8,B2,11,03,0 

10720 DATA 
5, 21, B9 

77,19,10,F3,C9,F 

36, 09, 23, 77, C6, 4 

10730 DATA 
4, ED, 5F 

B2, 11, 04, 00, 06,0 

F7,C9,21,B8,B2,E 

10740 DATA 
6,02,77 

CB,47,20,09,7E,C 

B2, 01, 1C, 00, CD, 5 

10750 DATA 
E,D6, 02 

19, 10, F9, 18,07,7 

0B,79,B7, 20, FB, 0 

10760 DATA 
9,15,42 

77, 19, 10, F9, FI, C 

C9, AF, CD, D5, 00, F 

10770 DATA 
3,50, 49 

4C,4F, 41, 44,22,5 

09, 3A,C9,B2,FE,F 

10780 DATA 
0,53, 4F 

4E, 22, 2C, 52, OD, 0 

18, OA, FE, 07, CO, 3 

10790 DATA 
A, 54, 45 

4E, 41,52, 4F, 4E, 3 


■ 


10810 DATA 56, 45, 4E, 43, 49, 5 
3,54,45 

10820 DATA 11, 02, 04, 03, 0A, 0 
8, 08, OA 

10830 DATA OF, OB, 06, OC, 07, 0 
F, OE, 12 

10840 DATA 05,15,00,19,03,1 
C, 09, ID 

10850 DATA 18, 18, 18, 18, 7E, F 
F, FF, 99 


10860 DATA 18,18,18,18,18,1 
8,18,18 

10870 DATA 66, 24 , FF, 99, DB, F 
F,C3,7E 

10880 DATA FO, 90, FO , A8, AD, 2 
F, 3D, 05 

10890 DATA 09,10,02,02,09,5 

8 , 02,02 

10900 DATA 09, AO, 02, 02, 09, E 

8 , 02,02 


10910 DATA AF,7C,00,08,D1,0 
0, 01, 04 

10920 D£TA Dl, 00, 03, 06, 00, 0 

0 , 00, 00 

10930 DATA 00,00 



JORNADAS ANUALES DE 
NEUROLOGIA 


D el 8 al 10 de di- 
ciembre de 
1988 se realiza- 
ron en Pinamar 
las XXX Jomadas Anuales 
de la Sociedad de Neurolo- 
gfa de la Provincia de Bue- 
nos Aires. 

Talent estuvo presente con 
dos stands. Adem£s la se- 
cretaria de las jomadas fue 
mtegramente organizada 
con equipos Talent DPC- 


200 . 

Utilizando s61o una DPC- 
200, una unidad de discos 
DPF-555, un monitor Ta- 
lent y una impresora se pu- 
do concretar exitosamente 
la inscripcidn general, la 
distribucidn de invitacio- 
nes a los distintos eventos, 
la confeccidn de los certifi- 
cados y diplomas, etcetera. 
En el stand de Talent se 
present software vertical 


para medicos, que fue reci- 
bidocon interds. Asimismo 
la firma EMAC expuso una 
interesante interfase para 
MSX2, que permite a los 
neurdlogos realizar elec- 
troencefalografias a trav6s 
de la computadora, con la 
posibilidades que brinda 
un procesador de texto 
frente a una mdquina de es- 
cribir. Realmente este de- 
sarrollo encontrd una bue- 


na receptividad entre los 
especialistas del tema, que 
vislumbran el nuevo medio 
que es la computacidn co- 
mo algo realmente podero- 
so y de fdcil uso. 

Por ultimo, el 6xito de las 
Jomadas fue tal que para el 
aflo prdximo planean reali- 
zarlas en la misma sede, y 
han solicitado el apoyo de 
Talent nuevamente. 


INFORMA: 




SERVICE OFICIAL PARA TODO EL PAIS REPUESTOS 
ORIGINALES PARA TODA LA LINEA CZY ZX 
ASESORAMIENTO INTEGRAL (IBM - APPLE) EN SOFTWARE 
HARDWARE Y TELEINFORMATICA 
PRESUPUESTOS EN 48 hs . ENVIOS AL INTERIOR 


ITUZAINGO 884 CAP. (1272) TE . 362-5876/361-4748 DELPHI : ANGEL 


'^yyv^yyyvyvvyyyyy^ 



hardy computation srl 


SERVICE OFICIAL CZERWENY 
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LOS UTILITARIOS DEL XENIX 
PARA MSX-DOS YALGO MAS... 


Si somos parte del grupo de los afortunados que tienen acceso a uno de los equipos deno- 
minados “tipo 386” o “multitasking” que corren el sistema operative) Unix o Xenix, ha- 
bremos notado la extensa biblioteca de programas utiiitarios que existe para este sistema 
operativo, suspirando por su ausencia en el entorno MSX-DOS. Ahora les explicamos 

porque no debemos suspirar mas. 


a solution se llama MSX- 
DOS Tools. 

Aunque no conozca el Unix o 
Xenix, cualquier usuario vera en es- 
tos utiiitarios una gran ayuda para el 
programador del entorno MSX-DOS. 
Este paquete, creado por la ASCII 
Corporation (duenos de la norma 
MSX), incorpora 28 utiiitarios para el 
sistema operativo, un nuevo editor de 
texto para programacion (el MED, 
mucho m£s avanzado que el ya clasi- 
co SCED) y el famosoUtility Softwa- 
re Package, que perm ite programar en 
Assembler para MSXDOS, MSX 
BASIC y Linkeditar los archivos in- 
termedios creados por el mismo As- 
sembler u otros productos de Micro- 
soft tales como el FORTRAN 80, 
COBOL 80, BASIC 80, etcetera. 

ALGO DE UNIX 

El sistema operativo Unix y su primo, 
el Xenix, fueron creados hace unos 
cuantos afios como un nuevo sistema 
operativo para lo que se conoce como 
“entorno multiusuario y multitarea”. 
Su filosofla permite que, a partir de u- 
na pequefia biblioteca de utiiitarios, el 
usuario programador pueda crear to- 
da su biblioteca de programas de a- 
cuerdo a sus necesidades, empleando 
al m&ximo el poder que brinda el U- 
nix. Junto con el Unix se creo el len- 
guaje de programacion ‘C\ tan am- 
pliamente difundido entre los progra- 
madores profesionales hoy en dia. 



En la actualidad el Unix o Xenix se u- 
tilizan en equipos de gran potencia, 
tales como los conocidos “386”, de- 
nomination que agrupa a los equipos 
que usan el chip de Intel 80386 y que 
generalmente admiten de 8 a 32 termi- 
nales, 160 Megabytes en disco duro, 2 
Mega de memoria por cada terminal, 
etcetera. La potencia de este sistema 
operativo le ha permitido seguir en vi- 
gencia varios afios despues de su cre- 
ation, compitiendo con el OS/2 y dis- 
tintas versiones del MS-DOS, con la 
option de multiusuario/multitarea - 
multiusuario significa que varios u- 
suarios pueden acceder “simultanea- 
mente” al equipo en un instante dado, 
y multitarea expresa que varias tareas 
pueden ejecutarse “simultaneamen- 
te”. 


PIPES & REDIRECCION 

Gran parte de la potencia del Unix re- 
side en la posibilidad de utilizar lo que 
se conoce como “pipe” y “redirec- 
tion”. Esta filosofla, incorporada lue- 
go en el MS-DOS v 2.0 en adclante, 
hace que con un mismo comando se 
puedan obtener resultados que se en- 
vfan a un archivo, a la pantalla o a u- 
na impresora, indistintamente. 
Veamos la redirection. Supongamos 
que queremos obtener una lista de los 
archivos en un disco, pero imprimirla 
en la impresora, en lugar de sacarla 
por la pantalla. El comando del Unix 
equivalente al DIR del MSX-DOS es 
LS. 

Bastara con indicar. 

A>LS >LISTA.TXT 
para que en el archivo LISTA.TXT se 
almacene la lista completa de los ar- 
chivos en el directorio. 

Del concepto de redirection podemos 
decirque existen dos “archivos” utili- 
zados siempre por defector el “estan- 
dar input” y el “estandar output” (en- 
trada estandar y salida estandar, res- 
pectivamente). Generalmente, ambos 
se refieren al teclado (input) y a la 
pantalla (output). 

Si queremos que la information se 
desvle de la pantalla y “vaya a parar” 
a un archivo, por ejemplo, basta con 
indicarlo mediante un slmbolo mayor 
(*>’) para desviar el output y con el 
menor (‘<‘) para desviar el input. 
Por otra parte, el ‘pipe’ (tuberia, en in- 



gI6s) rcprcsenta el conceplo de comu- 
nicacidn enirc utiliiarios: cl utiliiario 
prcdecesor le comunica al sucesor el 
rcsultado de sus trabajos. Por ejem- 
plo, cl utiliiario MORE (que luego de 
complctar una p£gina de tcxto en pan- 
talla, espcra que sc pulse una tecla) 
pucdc recibir del LS 
(lislar directorio) dicho listado y evi- 
tar que se “escape” el tcxto por arriba. 
Estas capacidadcs estin incorporadas 
cn el MSXDOS Tools. Por fin podre- 
mos enviar cl directorio a un archivo, 
copiar parte de <5stc, ordcnarlo un ar- 
chivo, etedtera con sdlo utilizar la re- 
dircccidn. 

UTILITARIOS UTILES 

Los 28 utiliiarios incluidos en el dis- 
co del MSXDOS Tools conforman un 
paquetc ideal para rcalizar tareas que 
requicran el manejo de archivos y que 
de otra forma nos obligarfan a progra- 
mar en MSX BASIC o algo similar. 
Entrc estos utilitarios se incluyen el 
BODY, TAIL, HEAD, etedtera que 
permiten extraer una parte de uno o 
mds archivos, CHKDSK y DISK- 
COPY para vcrificar y copiar discos 
(muy util para rescatar espacio perdi- 
do por alguna compilacidn fallida), 
etedtera 


Y ALGO MAS 

En la Tabla 1 se muestra el directorio 
del MSXDOS Tools. El editor incor- 
porado (MED) permite generar texto 
ASCII para programacidn en distin- 
tos lenguajes, tales como COBOL, 
FORTRAN, C y ASSEMBLER. 
Facilita la mezcla de archivos y mane- 
jo de bloques, incluyendo el traspaso 
de un bloque entre un archivo y otro. 
En la Tabla 2 incluimos un listado de 
los utilitarios que incorporan ayuda 
(se invocan con el switch ‘/h’) y la 
descripcidn del mismo. (Distribuye: 
Real Time y Red Point). 


Tabla 1: Listado de archivos incluidos en el MSX-DOS Tools: 

AiBEEP.COM 

ArGREP.COM 

ArMORE.COM 

AiBIO.COM 

ArHEAD.COM 

ArMSXDOS.SYS 

A:BODY.COM 

ArHELP.COM 

ArPATCH.COM 

A:BSAVE.COM 

ArKEY.COM 

ArSAMPLEl.DOC 

AiCAL.COM 

ArL80.COM 

ArSAMPLE2.DOC 

ArCALC.COM 

ArLIB80.COM 

ArSLEEP.COM 

ArCHKDSK.COM 

ArLIST.COM 

ArSORT.COM 

ArCLS.COM 

ArLS.COM 

ArTAIL.COM 

ArCOMMAND.COM 

ArM80.COM 

ArTR.COM 

ArCREF80.COM 

ArMED.COM 

ArUNIQ.COM 

ArDISKCOPY.COM 

ArMED.HLP 

ArVIEW.COM 

ArDUMP.COM 

ArMED.MES 

ArWC.COM 

ArECHO.COM 

ArEXPAND.COM 

ArMENU.COM 

A : WELCOME. DOC 


Tabla 2 - DESCRIPCION DE LAS APUCACIONES INCLUIDAS en el 
MSX -DOS TOOLS 

BEEP 

Envfa un eddigo Bel ( A G) al estandar output. 

Es util para indicar el final de la ejecucidn de una tarea larga. 

La mejor forma de saber edmo trabaja es tipear ‘beep’ y escuchar. 

BIO 

Generamos nuestro propio bioritmo para 4 1 dfas a partir de la fecha espe- 
cificada. 

Si <fecha-hoy> no se especifica, se asume la fecha actual. 

BODY 

Es una herramienta para extraer lfneas especi'ficas de los archivos de en- 
trada. 

BSAVE 

Convierte un archivo Intel HEX a binario, y se puedecargarcon el coman- 
do BLOAD del DISK-BASIC. 

CAL 

Envfa un calendario de tres meses al standard output Si se especifica la op- 
cidn ‘/y\ CAL muestra el calendario completo para el aflo indicado. 


Continue en la pdg.28 


Hugo Daniel Caro. 


Ejemplo: 

A>cal 1989-02 


Jan 1989 

Su M Tu W Th F Sa 

1 2 3 4 5 6 7 

8 9 10 11 12 13 14 

15 16 17 18 19 20 21 

22 23 24 25 26 27 28 

29 30 31 


Feb 1989 

Su M Tu W Th F Sa 
12 3 4 

5 6 7 8 9 10 11 

12 13 14 15 16 17 18 

19 20 21 22 23 24 25 

26 27 28 


Mar 1989 

Su M Tu W Th F Sa 
12 3 4 

5 6 7 8 9 10 11 

12 13 14 15 16 17 18 

19 20 21 22 23 24 25 

26 27 28 29 30 31 


CALC 

Calcula la expresidn en la tinea de comando e imprime 
el resultado. Porejemplo, ‘calc 1+2’ da el resultado ‘3*. 
Si se omite la expresidn, CALC ingresa al modo inte- 
ractive y pone el indicador ‘#\ En este modo se pueden 
ingresar distintas expresiones y obtener resultados, 
hasta que se saiga con el comando ‘Q\ 

CHKDSK 

Se verifica la integridad de las estructuras de dates en 
el disco. Si se encuentra un error, se inician acciones 
correctivas. Si se encuentran clusters perdidos, se pre- 
gun ta si se desea transformarlos en archivos para poder 
convertirlos en espacio de disco utilizable o archivos. 
Si se elige lo ultimo, los archivos tienen los nombres en 
el siguiente formato: FILE0000.CHK, FI- 
LE0001.CHK, etcetera. 

CLS 

Envia un cardcter ( A L) para borrar la pantalla al stan- 
dard output Es util para direccionarlo a la consola (por 
defecto), o a la impresora (con ‘>pm’). La mejor forma 
de ver edmo trabaja es tipear ‘els’ y observar. 

DISKCOPY 

Genera un disco de respaldo o verifica entre dos discos. 
El tipo de ambos discos debe ser el mismo. 

DUMP 

Muestra un dump en hexadecimal y caracteres ASCII 
de uno o mds archivos. Cuando no se especifica archi- 
vo, se toma el estdndar input. Por defecto, se muestra el 
dump de todo el archivo con el desplazamiento en he- 
xadecimal de cada tinea. 

ECHO 

Muestra los argumentos de la tinea de comandos. 
EXPAND 

Convierte tabs a la misma cantidad de espacios. Es util 


para pre-procesamiento (por ejemplo, antes de impri- 
mir archivos de texto que contengan tabs). Si se espe- 
cifica el ‘/r\ switch reemplaza espacios con tabs. Si 
<archivo> es omitido, se procesa el standard input. 

GREP 

Permite una busqueda rdpida a travds de los archivos 
especificados del string ingresado entre comillas, y 
muestra las tineas que contienen este string en el stan- 
dard output. Si se omiten los nombres de archivo, se 
busca en el estdndar input. 

HEAD 

Imprime los primeros 10 (o la cantidad especificada 
de) tineas de uno o mds archivos. 

Si no se especifica archivo, se imprime el estandar in- 
put 

Por defecto, los archivos se imprimen con su nombre 
y los numeros de tinea. 

HELP <comando> 

Si deseamos ayuda para los comandos del MSX-DOS 
TOOLS, deebmos tipear 
HELP <comando> 
o 

<comando> /H 

donde <comando> es un nombre de los comandos del 
TOOLS. 

Todos los comandos del MSX-DOS TOOLS tienen 
instalada la funcidn “imprimir mensaje de ayuda” que 
puede invocarse con el switch ‘/H’. 

I 

KEY 

Asigna strings para las tec las de funci6n KEY, o habi- 
lita o inhabilita la tinea de teclas de funcidn. 

El string debe estar entre comillas para poner espacios 
o barras en el mismo. 

Los caracteres de control pueden especificarse con la 
represen tacitin hexadecimal de dos dfgitos de ese ca- 



r4cter precedido por ‘V. Por ejemplo, “ N '0D” es el 
cddigo dc retomo de carro (RETURN). 

LIST 

Convierte un archivo MSX BASIC binario a texto 
ASCII. 

LS 

Lista el contcnido del directorio; repite los nombres 
dc los archivos en el directorio (y, con switches, da el 
tamaflo y la fecha de la ultima actualizacion) para ca- 
da archivo. 

Por defecto, los nombres dc archivo se ordenan alfa- 
bdticamcnte. 

MENU 

Pcrmite revisar una lista de archivos y realizar tareas 
de mantenimiento en forma interactiva con subco- 
mandos C(opy), D(ump), E(rase), R(ename) y 
T(ype). 

Otros subcomandos son: N(ext), RETURN, SPACE o 
CURSOR ABAJO (saltea el archivo actual), Pre- 
vious), BS o CURSOR ARRIBA (vuelve al archivo 
anterior), H(elp) que muestra ayuda, y Q(uit) que fi- 
nal iza el comando. 

MORE 

Muestra una pantalla completa de lfneas de texto del 
archivo de entrada y espera su comando. 

RETURN: muestra una linea m£s. 

SPACE: muestra una pdgina mds. 

S: pasa al siguicnte archivo. 

Q, A C: aborta el comando MORE. 

PATCH 

Pcrmite editar un archivo binario con solo recorrerlo 
ulilizando P(rcvious page), N(ext page) y las teclas 
de cursor, y rctipcando los nuevos datos. A los otros 
comandos se puede acceder pulsando las teclas ESC 
oT; 

P = vuelve al modo edicidn, 

X = graba y sale, 

Q = sale sin grabar 

y ccodigo hcxa> = saltar a <codigo hexa> 

SLEEP 

Hace tiempo durante un intervalo dado o, si se espe- 
cifica la opcion ‘/A’, hasta que se llegue a la hora es- 
pecificada. 

Opcionalmcntc, suena un “beep” cuando se despier- 
ta. 


SORT 

Concatena y ordena las lfneas de los archivos de en- 
trada y luego escribe el resultado en el standard out- 
put. 

Si no se especifica archivo de entrada, se ordena el 
standard input. 

Por defecto, el campo de ordenamiento es la lfnea en- 
tera, y el orden es alfabdtico. 

TAIL 

Imprime las ultimas 10 (o la cantidad especificada 
de) lfneas de uno o mds archivos. Si no se especifica 
archivo, se imprime el standard input. 

Por defecto, los archivos se imprimen con sus nom- 
bres y numeros de lfnea. 

TR 

Sustituye cada ocurrencia de los caracteres en 
<stringl> (por defecto) o una palabra que coincida 
con <stringl>, por los caracteres equivalentes en 
<string2> o el mismo <string2>. 

UNIQ 

Remueve lfneas duplicadas en el archivo indicado. Si 
las lfneas adyacentes son iguales, s61o devuelve la 
primera de estas lfneas. 

VIEW 

Permite revisar un archivo hacia el principio o hacia 
el final utilizando teclas de subcomandos. 

A diferencia de un editor de pantalla, el archivo no se- 
ra reescrito nunca por accidente. 

arriba...5 lfneas arriba 
abajo. . .5 lfneas abajo 
izq....8 columnas izquierda 
der....8 columnas derecha 
‘P’...p^gina previa 
‘N’...pdgina siguiente 
‘H’...comienzo del archivo 
‘T’...fin del archivo 
Q o A C salir 
?... ayuda 

WC 

Contador de palabras 

Cuenta la cantidad de palabras, lfneas y pdginas en 
los archivos especificados, y da los totales para cada 
archivo. Si no se especifica el nombre de archivo, se 
toma el standard input. Una p£gina esta definida con 
60 lfneas, por defecto. 

El switch ‘/P’ permite saltear este valor por defecto. 


EJECUCION AUTOMATICA 


Cuando encendemos la computadora podemos hacer que se ejecute nuestro programa 

favorito. En esta nota vemos como lo logramos. 


FIGURA 1 

Listado Programa Principal 

CHR$ (34) 

240 KEY 8, "files" + 

100 REM **************** 

CHR$ (13) 

110 REM * * 

250 KEY 9, "key off" 

120 REM * AUTOEXEC.BAS * 

2 60 KEY 10, "LOAD" + CHR$ 

130 REM * * 

(34) + "RESET" + CHR$ 

140 REM * * 

(13) + "run" + CHR$ (13) 

150 REM **************** 

270 WIDTH 40 

160 REM 

280 COLOR 1,3 

170 REM Por Gustavo 

290 FILES 

Delf ino 

300 LET ED=DSKF ( 0 ) 

180 REM DELTA*tro 

310 PRINT rPRINT ED* 

n 

1024; "bytes disponi- 

190 REM 

bles ="; ED; "kbytes" 

200 KEY 3, "width " 

320 LET K$=INKEY$ 

210 KEY 5, "run " 

330 IF K$="" THEN 320 

220 KEY 6, "color 1,3,3” + 

340 CLS 

CHR$ (13) 

350 KEY ON 

230 KEY 7, "load " + 

360 NEW 


I I 

* I nadelastantasventajasque 

I I tienen quienes poseen una 

unidad de discos flexibles 
es la de poder disponer de programas 
AOTOEreCUT ABLES J (uno por 
cada disquete). 

El sistema operativo de la norma 
MSX, llamado MSX DISK BASIC, 
al encenderse el equipo busca en la u- 
nidad de disco activa un archivo al- 
macenado bajo el nombre “AUTOE- 
XEC.BAS” que, en el caso de ser ha- 
llado, se carga y ejecuta automatica- 
mente, sin intervenci6n alguna del u- 
suario. 

Esta modalidad permite tener alma- 
cenado en cada disco un pequeflo pro- 
grama que se encargue de una serie 
de tareas rutinarias que de otro modo 
deberfan ser ejecutadas manualmente 
cada vez que se comienza a operar el 
sistema. 

Como ejemplo de aplicaciones de los 
ARCHIVOS DE PROGRAMAS 
AUTOEJECUTABLES, mencione- 
mos: a) el acondicionamiento de la 
pantalla de acuerdo a los gustos del u- 
suario, b) la redefinicidn de las teclas 
de funcion, c) la exhibicion del direc- 
torio del disco activo, d) la salida por 
pantalla de la cantidad de espacio dis- 
ponible en el disco activo, e) la pues- 
ta en marcha (carga y ejecuci6n) de u- 
no o m&s programas residentes en el 
disco, etcetera. 

El grado de aprovechamiento y el tipo 
de uso que se les de a estos PROGRA- 
MAS AUTOEJECUTABLES varfa 
con cada usuario, y con sus gustos y 


necesidades, pero en general ofrecen 
una potencialidad digna de ser tenida 
en cuenta. En laFigura 1 puede obser- 
varse un ejemplo de los tipos de apli- 
caciones que pueden volcarse en un 
“Autoexec.bas”. 

Observense los siguientes aspectos 
del programa: 

I - Su formato esta disefiado especial- 
mente con fines didacticos, por lo 
cual se ha recurrido al empleo de RE- 


Marks y a evitar las lineas multisen- 
tencias, que dificultan notablemente 
la lectura del conjunto. 

II - Cortsta de tres partes operativas: a) 
la redefinition de las teclas de funcion 
(lineas 200-260), b) el reacondiciona- 
miento de la pantalla (lineas 270- 
280), y c) la exhibicidn automatica 
del directorio del disco activo y de la 
cantidad de espacio disponible en el 
mismo. 



Ill - A1 final i/.ar su ejccuci6n, las linc- 
as 320-330 aguardan a quc cl usuario 
pulse cualquicr tccla, con lo cual cl 
propio programa sc AUTOELIMIN A 
con un NEW, y deja la totalidad dc la 
memoria lista para comcnzar a opc- 
rar. 

Un RESET asignado a 
F10 

La facilidad quc presentan las compu- 
tadoras dc la norma MSX depoder re- 
definir, tanto cn Modo Dirccto como 
a travds dc un programa cn BASIC, la 
FUNCION asignada a cada una dc las 
10 tcclas espccialmcntc dcstinadas a 
cllo, otorga una cnormc ventaja sobre 
sus pares quc no la posccn. 

La scntcncia (KEY numcro,funci6n 
asignada) permile, cn forma suma- 
mente scncilla, modificar total o par- 
cialmente las tareas que descamos pa- 
ra cada una dc las tcclas dc funcidn. 
La dccisidn sobre la naturalcza dc las 
funcioncs quc asignemos depende 
principalmcntc dc la frecucncia con 
que las vayamos a ulilizar. Dc nada 
sirve molcstarsc cn reservar una tccla 
con alguna operation quc no ejccuta- 
mos casi nunca cn nucstra prdctica co- 
tidiana. Convicnc cn dichos casos in- 
gresar el comando corrcspondicntc 
cn Modo Dirccto, o fijarlo por medio 
dc una llnea del programa quc cir- 
cunstancialmcntc lo rcquicra. 


En la Figura 2 sc ha volcado un “mi- 
cro-programa” (puro cncabezamien- 
to) quc se cncarga de “rcsetear” nues- 
tra computadora cuando pulsamos 
F10 (SHIFT + F5). Se ha disefiado de 
forma que se cargue autom&icamen- 
te el programa (previamente almace- 
nado bajo el nombre de “RESET” en 
cl mismo disco que cl “AUTOE- 
XEC.BAS”) y que luego sc ejecute 
tambidn en forma automdtica. 

Estc modo de cjccucidn del “resetea- 
do” para nada cs neccsario y mucho 
mcnos cs cl mds eficiente; s61o ha si- 
do elegido para ejcmplificar la forma 
dc cargar y ejccutar un programa por 
medio dcuna tccla de funci6n predefi- 
nida. 

Obviamente, cl hecho de habdrsele a- 
signado esta tarea a la tecla F10 o a o- 
tra cualquiera dentro del rango 6- 1 0, y 
no a una de 1 a 5, es justificado por la 
convcniencia de evitar el resetco in- 
voluntario al pulsar inadvertidamente 
o por accidcnte una de 6stas, cosa que 
cs sumamente improbable (aunque 
no imposiblc) al requerirse que se pul- 
sen simultdneamente SHIFT y F5. 
Con esto nos ahorramos el disgusto. 
Resulta tambidn obvio resaltar la ne- 
cesidad de que comprcndan, para los 
recidn llegados a la computation que 
el RESET es un recurso IN EXTRE- 
MIS. Debe ser empleado solamente 
cuando no quede otro remedio, dado 


que la pdrdida de todo lo residente en 
memoria tanto datos como programas 
es irremediable. 

Serla grato para nosotros recibir 
comentarios de los lectores sobre el 
resultado obtenido por estas sugeren- 
cias, AUTOEXEC y RESET para 
MSX, y mas ideas que se puedan a- 
portar sobre el mismo tema. 

Gustavo O. Delfino 


FIGURA 2 

Listado Programa RESET 

100 

REM 

************* 

110 

REM 

* * 

120 

REM 

* RESET MSX * 

130 

REM 

★ * 

140 

REM 

************* 

150 

REM 


160 

REM 

Por Gustavo 

Delfino 


170 

REM 

D E L T A *t r 

o n 



180 

REM 


190 

DEF 

USR0=&H000 

200 

LET 

A=USR0 (0) 

210 

RUN 
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ABSTAT: UN 
S1STEMA DE 
ESTAD1ST1CAS 
PARA MSXDOS 

Los cientfficos e ingenie- 
ros poseedores de compu- 
tadoras de la norma de 
MSX conocen la potencia- 


lidad de la maquina y en di- 
versas ocasiones se habran 
preguntado por qu6 no e- 
xistfa algiin paquete que 
respondiera a sus requeri- 
mientos. 

ABSTAT es otro de los pa- 
quetes “rescatados” del 
CP/M 80 que funciona per- 
fectamente en MSX-DOS. 
Posee la mayorfa de las 
funciones deseables para 
una aplicacion estadi'stica, 
incluyendo la manipula- 
cion de datos, el analisis es- 
tadfstico propiamente di- 
cho, la obtencion de diver- 
sos graficos relacionados y 
finalmente, la emision de 
reportes. 

Cuando invocamos por pri- 
mera vez el ABSTAT se 
nos presenta la pantalla ini- 
cial y nos indican (en in- 
gles) que para obtener ayu- 
da basta con pulsar el signo 
de pregunta (?) y a conti- 
nuacion el comando que se 
desea consultar. Esto hace 


innecesario el uso del ma- 
nual. 

El programa divide su fun- 
cionamiento en cinco areas 
de utilizacion: manipula- 
cion de datos (DATA), a- 
nalisis estadfstico (STAT), 
funciones graficas 
(GRAPH), emision de re- 
portes (REPORT) y misce- 
laneas (MISC). 
Miscelaneas (MISC) in- 


cluye cuatro comandos: 
QUIT finaliza la ejecucion 
del ABSTAT 
HELP funciona igual que 
el(?) 

COMM permite ejecutar 
un conjunto de comandos 
desde un archivo cuya ex- 
tension sea .KMD (si no se 
provee una) 

DIR emite el directorio. 
Como unica aclaracion, 
hay que destacar que el co- 
mando COMM es real- 
mente interesante ya que 
permite programar un ana- 
lisis estadfstico completo 
para un conjunto de datos 
dado, sin necesidad de te- 
ner que tipear todo. 
Veamos ahora cada area de 
ejecucion. 

Area 1: DATA 
La base de datos en uso se 
divide en casos, que a su 
vez pueden tener distintos 
valores sobre cada item, 
denominado variable. Por 
ejemplo, un archivo inclui- 


do en el disco nos muestra 
un conjunto de datos en 
donde cada caso es una per- 
sona, y cada dato relaciona- 
do con un caso es la edad, el 
peso y la altura. 

Cuando se edita o imprime, 
se puede seleccionar un 
conjunto de casos o varia- 
bles. Lo mas interesante es 
la posibilidad de importar 
datos desde un archivo AS- 
CII (creado, por ejemplo, 
por un programa BASIC 
que se utilice para el ingre- 
so de datos) o de dB ASE II 
(y poder asf realizar estu- 
dios estadfsticos sin necc- 
sidad de crear un programa 
dedicado al ingreso de da- 
tos.) 

Area 2: STAT 
Aquf es donde se nos pone 
un poco diffcil analizar las 
ventajas de las distintas 
funciones incluidas, ya que 
para ello hay que conocer la 
materia o bien ser estudian- 
te de una carrera cientffica 
(que generalmente no “za- 
fa” de cursar). 

Las funciones son: 

ANOV1 Analisis de va- 
rianza de una manera 
ANOV2 Analisis de va- 
rianza de dos maneras 
CHIFIT Chi cuadrado para 
la exactitud en la aproxi- 
macion 

CONTIG Coeficiente de 2 
formas de contingcncia 
Chi cuadrado 
CORR Matriz de cocfi- 
cientes de correlation 
DESC Medias, desviacion 
estandar, moda, etcetera. 
FREQ Lista valores, fre- 
cuencias, % y valores de Z 
MANN U test de Mann- 
Whitney 

MDIFF Prueba de la media 
para pares de variables 
MEANT Prueba de media 
de poblacion 


PAIRT Prueba t para ob- 
scrvacioncs de a pares 
PROB Comandos de pro- 
babilidad CHI, TTEST, 
FTEST, POIS, BIN (sin 
mas explicaciones..) 

REGR Rcgresion lineal 
simple y multiple 
SRANK Matriz decorrela- 
tion de rango Spearman 
XTAB Tabulacion cruza- 
da 

ZSCOR Listado de valo- 
rcs, frccucncias, % y valo- 
rcs de Z. 

La unica aclaracion que pu- 
dimos rescatar en nuestra 
ignorancia es que “media” 
se refiere (generalmente) al 
promedio, que “tabulacion 
cruzada” es una tabla de to- 
dos contra todos para com- 
paraciones, y nada mas. 
Dejamos a los expcrtos que 
evaluen si estas funciones 
son intercsantcs o no. 

Area 3: GRAPH . :• 
^Como es posible que un 
programa CP/M ignorante 
de que hardware utiliza, 
pueda realizar graficos? 
Muy facil: utiliza caracte- 
res ASCII estandar para 
confeccionar graficos de 
barras y puntos sueltos 
(scatter plot). Sin embargo, 
esta representacion es bas- 
tante interesante. El soft se 
encarga de poner en escala 
estos graficos y como no u- 
tiliza ninguna funcion gra- 
fica real, se puede enviar cl 
mismo directamente a 
cualquicr imprcsora conec- 
mda a la maquina sin pro- 
blcmas de compatibilidad. 
Area 4: REPORT 
Recomendamos, cuando se 
ingrcsa por primera vez, vi- 
sualizar el programa de- 
mostracion inclufdo en el 
paquete, ingresando el co- 
mando: COMM DEMO. 
En el se visualiza el ejerq- 



*** STUDENT'S T STATISTICS *** 

VARIABLES: 




1 WEIGHT 

0.00000 



2 HEIGHT 

-4 . 75293 

0.00000 


3 AGE 

-37.7492 

-23.5714 

0.00000 


1 WEIGHT 

2 HEIGHT 

3 AGE 

DEGREES OF FREEDOM = 3 



WHICH COMMAND? 

CHIFIT 



ENTER VARIABLE 

WITH OBSERVED 

FREQUENCIES: 

1 

ENTER VARIABLE 

WITH EXPECTED 

FREQUENCIES: 

2 




plo antes dcscripto y edmo 
funcionan los archivos 
.KMD. 

Como conclusion, cl nivcl 
del software cxistcntc para 
CP/M queda demostrado 
una vc z mas con cstc pa- 
quctc. Los profcsionales 
consultadosquecstan utili- 
zando al ABSTAT coinci- 
den cn deeir que es una he- 
rramienta poderosa para el 
analisis cstadfstico para en- 
cucstas, reportes, etcetera. 
(Distribuyen: Red Point y 
Real Time) 

DAWN PATROL 


Dccada del 40, plena Gue- 
rra M undial. Estamos al 
mando de un submarino a- 
liado en cl Mcditcrranco, 
cncargado de rcalizar dife- 
rentes misiones. 

Estc programa es una simu- 
lacion muy bien lograda al 
cstilo “GATO” (para la If- 
nca PC o Macintosh) que 
nos brinda la cxcitante po- 
sibilidaddcaprenderlasar- 
tes de la guerra submarina. 
Debemos comandar el sub- 
marino, timonearlo evitan- 
do los escollos, lanzar los 
torpedos (cstando en posi- 
cion, por supuesto), y lle- 
var a buen puerto la mision 
que nos cncomendaron. 

A nucstra disposicion tene- 
mos cl panel de control que 
incluye lo siguiente: 
Pcriscopio (lo que sc ve a 
traves de cl), nivel de oxf- 
geno, oricntacion del peris- 
copio, velocidad (es un ve- 
locfmctro de rcloj analogi- 
co que indica la velocidad 
real y con un indicador lu- 
minoso que indica la velo- 
cidad propucsta), profun- 
didad (un instrumento ana- 
logico mide la profundidad 
en pies y un indicador que 
muestra a que distancia se 


encuentra el fondo marino) 
y brujula (muestra hacia 
dondc se dirige el submari- 
no y, con un indicador, ha- 
cia donde esta girado el ti- 
mon). 

A la derecha del panel de 
control se encuentra la me- 
sa del capitan, que nos per- 
mite ver distintos instru- 
mentos e indicadores, con 
solo pulsar las teclas de 
funcion. Estas son: 

FI: Sala de maquinas 
F2: Torpedos 
F3: Mapa 

F4: Reporte de dafios 
F5: Cuademo de bitacora 
Nuestras bases de reapro- 
visionamiento son ties: 
Gibraltar (en 05 grados 00 
min W, 36 grados 22 min 
N), Malta (en 14 grados 38 
min E, 35 grados 15 min 
N), Alejandrfa (en 30 gra- 
dos 00 min E, 30 grados 30 
min N) 

Las teclas para comandar la 
nave son las siguientes: 
Timon: los cursores 
Periscopio: barra espacia- 
dora + Cursores 
Motor diesel (si-no): tecla 
<D> 

Motor electrico (si -no): te- 
cla <E> 

Carga lastre: tecla <INS> 
Expulsa lastre: tecla 
<DEL> 

Estabiliza lastre: tecla 
<HOME> 


Fijar velocidad avance: te- 
cla <CTRL> 

Fijar velocidad retroceso: 
tecla <SHIFT> 

Torpedos 

Lanzamiento torpedos 
frontales: barra espaciado- 
ra y <1>..<4> 
Lanzamiento torpedos 
posteriores: barra espacia- 
dora y <5>..<6> 

Cargar tubos: barra espa- 
ciadora y <n>, donde n es el 
numero de tubo por cargar. 
Finalmente, con barra es- 
paciadora y <F> se cargan 
el combustible y los torpe- 
dos si nos encuentramos en 
una base (con velocidad 0 y 
a nivel del mar); y con la te- 
cla <0> se toma o no oxf- 
geno. 

Cabe destacar que para 
cumplir con una misidn de 
busqueda de agente, si se 


debe realizar antes de una 
hora determinada, basta 
con situarse en la longitud y 
latitud fijada antes de dicha 
hora, a nivel del mar y con 
velocidad cero (jcuidado 
los enemigosl). Si se debe 
esperar a un agente a deter- 
minada hora, se hara lo 
mismo, pero se debe espe- 
rar a que la hora se cumpla. 
Realmente, este juego de- 
muestra que los recursos de 
la norma MSX brindan a 
los programadores profe- 
sionales la oportunidad de 
crear soft de alta calidad. 
Este programa tiene el pro- 
blema del tiempo: luego de 
* jugarlo un rato, miramos el 
reloj y vemos con asombro 
que transcurrieron horas... 
y nos falta completar otra 
mision. (Distribuye: Real 
Time) 


SOFT 

— LOS ESPECIALISTAS — 

MAS DE 10.000 TITULOS EN DISCO Y CASSETTE 
PARA MSX 1 -MSX2-SPECTRUM-COMMODORE DESDE A2 
MSX2 - EXCLUSIVOS ij1942 • PENGUIN ADVENTURE!! 128 K 
LAS NOVEDADES ANTES QUE NADIE 
ii TODOS!! LOS UTILITARIOS PARA MSX1, 2 - SPECTRUM - 
COMMODORE 

OFERTAS 

CASSETTE 12 JUEGOS MSX A 35 
CASSETTE 1 2 JUEGOS SPECTRUM A 35 
CASSETTE 20 JUEGOS COMMODORE 
DISKETTES 3 1/2-5 1/4 - 8' - TODAS L 
MARCAS A LOS MEJORES PRECIOS 
COMPRA - VENTA DE MAQUINAS 
MEJORAMOS CUALQUIER OFERTA 
LUNES A SABADO 9-21 HS 


AV. SANTA FE 3117 Loc. 1 - Tel.: 825-0977 



Pag. 33 





ARCHIVOS 


Les escribo para felicitar- 
los por la revista y para 
que, si pueden, me contes- 
ten unas preguntas. 

1. iComo puedo hacer un 
back-up de mis discos? 

2. ^Me podrian decir don- 
de puedo conseguir mate- 
rial sobre tratamiento de 
archivos? 


Marcelo Cortez 
Remedios de Escalada 

LOAD MSX 

1. La forma mas sencilla es 
cargar el si sterna y luego co- 
locar: 

COPY * * B: 

La computadora comenzara 
a leer los programas y archi- 
vos que csten en el disco. 
Cuando lo pida, cambiemos 
el disquete y coloquemos a- 
quel sobre el cual queremos 
hacer la copia. Repitamos la 
operacion de cambio de dis- 
cos tantas veces como sea 
necesaria. 

2. Hemos publicado varias 
notas sobre el tema tanto en 
el Rincon del Usuario como 
en otras paginas de nuestra 
revista. Por ejemplo se pue- 
den ver los numeros 22 (pa- 
gina 8), 24 (pagina 20), 25 
(pagina 22) y 29 (pagina 5). 
Ademas, casi todos los li- 
bros para principiantes y 
gui'as del programador exis- 
tentes para MSX le dedican 
una section especialmente a 
este tema. 

ERRORES 


Me gustaria que me expli- 
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Para comunicarse con nosotros 
deben escribirnos a "Load MSX ”, 
Parana 720 , 5 q Piso, (1017), 
Capital Federal. 


caran la diferencia entre 
los mensajes de error O- 
VERFLOW y OUT OF 
MEMORY. 

Horacio Medina 
Capital Federal 

LOAD MSX 

El OVERFLOW o desbor- 
damiento se produce cuando 
un numero es demasiado 
grande para el tipo de varia- 
ble, funcion o sentencia que 
lo sustenta. 

En cambio el OUT OF ME- 
MORY o desbordamiento 
de memoria se produce 
cuando la ejecucion se sale 
de la memoria porque el pro- 
grama es muy extenso. 

RESOLUCION 

GRAFICA 


Felicitaciones por la revis- 
ta. 

Mi pregunta es que resolu- 
tion grafica tiene la Talent 
DPC-200. 

Maria L. Diogo 
Gualeguaychu 

LOAD MSX 

Como es bien sabido las 
MSX tienen 4 modos de 
pantalla. 


El modo 0 es de texto y tiene 
40*24 caracteres. 

El modo 1 tambicn es de tex- 
to y tiene 32*24 caracteres. 
El modo 2 es el de alta reso- 
lution grafica y tiene 
256*192 puntos. 

El modo 3, finalmente, es el 
modo multicolor y tiene 
64*48 bloques. 

Otras caracterfsticas de los 
modos de pantalla son las si- 
guientes. 

En los modos 1 y 2 se puede 
ingresar texto, los 3 y 4 se 
pueden hacer graficos, ade- 
mas de con tar con 1 6 colores 
en pantalla. Excepto en el 
modo 1, en los restantes se 
pueden manejar sprites. 

MOTOR 


Tengo problemas con mi 
grabador. Le pongo la ins- 
truction MOTOR ON pe- 
ro incluso asi es imposible 
hacerlo funcionar. ^Que 
puedo hacer? 

Mauricio Salas 
Capital Federal 

LOAD MSX 

No podemos saber con los 
datos que nos das cual puede 
ser el problema, pero te po- 
demos dar algunos conse- 
jos. 



El problema podria ser que 
el cable del grabador no se 
encuentre en buenas condi- 
ciones o haga algun contac- 
to incorrecto. Podemos pe- 
dir un cable a algun amigo y 
verificar esta posibilidad. 
Otro truco seria concctar los 
cables y, si como dccis el 
grabador no funciona, man- 
tener presionada la tecla de 
PLAY y colocar el comando 
MOTOR (sin poner ON) sc- 
guido de RETURN. 

Se deberfa escuchar un ruido 
metalico y seco. 

Cada vez que entramos la 
sentencia MOTOR debe- 
mos escuchar ese ruido. De 
lo contrario seria conve- 
niente hacer revisar la com- 
putadora en el scrvicio lec- 
nico o pedir ayuda al Centro 
de Atenciun al Usuario de 
Talent. 


SALUDO 


Esperamos que tengan un 
muy buen 1989 y que la re- 
vista siga aportando a los 
usuarios de la norma MSX 
tantas novedades y moti- 
vos de interes como de cos- 
tumbre. 

Martin Gallardo y 
Fabian Roque 
Mar del Plata 


LOAD MSX 

Retribuimos los saludos a 
todos los lcctores que nos hi- 
cieron llegar su mensaje de 
fin de ano. A todos, muchas 
gracias y FELIZ 1989. 
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PARA TODOS 




COMPUTACION 


PARA PROGRAMAR 


CONCURSOS PARA 
LAS VACACIONES 


PC IBM COMPATIBLES - DREAN COMMODORE - MSX - SPECTRUM 











Ikrfe ! 




Computadora 
Personal TPC- 

Caracteristicas: 

Microprocesador Z80A - 3,58 MHz. 
128 KB de memoria principal. 

1 28 KB de memoria de video. 

48 KB de MSX-BASIC Extendido, 
Version 2.0. 

32 KB de compilador Turbo BASIC, 
incluye programa en ROM con 
cuatro funciones de accesorios: 
calculadora, reloj, calendario y 
juegode quince. 

Almacenamiento permanente de 
parametros preferidos: modo de 
pantalla, color de fondo, senates 
auditivas, mensajes, etc., y 
password para control reservado de 
acceso. 

Teclado profesional ergonomico de 
73teclas. 

Nuevos modos graficos incluyendo 
texto de 80 columnas y resolucion 
de512 x 212 pixels multicolor. 

Reloj con dos alarmas y calendario 
permanente con bateria de backup. 
Capacidad de sobreimpresion de 
imagenes y digi talizacion de video. 
Grabacion de imagenes en diskette. 
Soportede RAM-Disk. 


Soporte de Light Pen. 

Conector para perifericos de 
digitalizacion de imagenes. 

Salida a TV PAL-N y NTSC con 
modulador incorporado. 

Salidas para impresora paralela, 
video compuesto y RGB analogico 
incorporadas. 

Totalmente compatible con 
software, accesorios y perifericos 
deMSXI. 


Conozca Talent MSX 2 Turbo. 

La ventaja de un equipo 
profesional de super-tecnologia. 

Y la simplicidad de una maquina 
de pensar domestica. 

Con abundante memoria. Un buen 
lenguaje basic incorporado. 
Amplias posibilidades de 
conexion a perifericos. 

Y mas. Por menos. 

Porque el futuro esta cerca. 
Tengalo ya. 





